EXPORTAÇÃO DE DXF DE IDW FILE COM PART NUMBER INSTEAD DE FILE NOME

[John2020]

Olá, senhor.

recentemente eu tenho copiar um ilogic do fórum autodesk, e actulally eu desejo exportar o padrão desdobramento para dxf com número de parte em vez do nome do arquivo em arquivos ipt. apreciar se você pode me ajudar a editar o código como abaixo.


minha amostra esperada: http://mega.nz/file/xf0qxloa#v5iqzzbitihin-cimbiurdeexakihiyea3b3q1hdt08dim odoc como documento = esta aplicação. activedocument 'get active documento
se odoc.documenttype <> documenttypeenum.kdrawingdocumentobject, em seguida, sair sub 'drawings only
para cada omodelo como documento em odoc.referenceddocuments' loop através de todos os documentos referenciados
Peças de metal folha apenas
se omodel.documentsubtype.documentsubtypeid <> "{9c464203-9bae-11d3-8bad-0060b0ce6bb4}" então continue para
dim osmcd as sheetmetalcomponentdefinition = omodel.componentdefinition
se não osmcd. hasflatpattern então 'se ele não tem um patter plano, criar um (desdobre o modelo)
osmcd.unfold ()
osmcd.flatpattern.exitedit ()
terminar se
dim fname as string = omodel. fullfilename 'get the document's path and name
fname = microsoft.visualbasic.left (fname, len (fname) - 4) & ".dxf"
dim sout as string = "flat pattern dxf? acadversion = r12 & rebasegeometry = true & outerprofilelayer = 0 & outerprofilelayercolor = 0; 0; 0 & interiorprofileslayer = 0 & interiorprofileslayercolor = 0; 0; 0 & invisíveis = iv_arc_centers; iv_tangent; iv_roll; iv_roll_roll_tangent; iv_altrep_back "Configurações de exportação
Tenta tentar.
osmcd.dataio.writedatatofile (sout, fname) 'export
captura
tentativa final
Próximo

 

[Andrea Scarnecchia]

caro senhor,
Eu modifiquei a regra ilogic ti obter o número da peça e usar isso em vez do nome do arquivo para o nome do dxf (eu comentei uma linha e a parte que eu adicionei é entre o "------------"):

dim odoc como documento = esta aplicação. activedocument 'get active documento
se odoc.documenttype <> documenttypeenum.kdrawingdocumentobject, em seguida, sair sub 'drawings only
para cada omodelo como documento em odoc.referenceddocuments' loop através de todos os documentos referenciados
Peças de metal folha apenas
se omodel.documentsubtype.documentsubtypeid <> "{9c464203-9bae-11d3-8bad-0060b0ce6bb4}" então continue para
dim osmcd as sheetmetalcomponentdefinition = omodel.componentdefinition
se não osmcd. hasflatpattern então 'se ele não tem um patter plano, criar um (desdobre o modelo)
osmcd.unfold ()
osmcd.flatpattern.exitedit ()
terminar se
dim fname as string = omodel. fullfilename 'get the document's path and name
'fname = microsoft.visualbasic.left (fname, len (fname) - 4) & ".dxf"
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
dim opartnumber as string = omodel.propertysets.item("inventor sumário information").item("número da parte"). valor 'get the 3d document's part number
fname = opartnumber & ".dxf" 'assinar o número da peça à variável nome em vez do nome do arquivo
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
dim sout as string = "flat pattern dxf? acadversion = r12 & rebasegeometry = true & outerprofilelayer = 0 & outerprofilelayercolor = 0; 0; 0 & interiorprofileslayer = 0 & interiorprofileslayercolor = 0; 0; 0 & invisíveis = iv_arc_centers; iv_tangent; iv_roll; iv_roll_roll_tangent; iv_altrep_back "Configurações de exportação
Tenta tentar.
osmcd.dataio.writedatatofile (sout, fname) 'export
captura
tentativa final
Próximo

 

[John2020]

[QUOTE = "Andrea Scarnecchia, post: 460773, member: 89736"]caro senhor,
Eu modifiquei a regra ilogic ti obter o número da peça e usar isso em vez do nome do arquivo para o nome do dxf (eu comentei uma linha e a parte que eu adicionei é entre o "--------------- - "):

dim odoc como documento = esta aplicação. activedocument 'get active documento
se odoc.documenttype <> documenttypeenum.kdrawingdocumentobject, em seguida, sair sub 'drawings only
para cada omodelo como documento em odoc.referenceddocuments' loop através de todos os documentos referenciados
Peças de metal folha apenas
se omodel.documentsubtype.documentsubtypeid <> "{9c464203-9bae-11d3-8bad-0060b0ce6bb4}" então continue para
dim osmcd as sheetmetalcomponentdefinition = omodel.componentdefinition
se não osmcd. hasflatpattern então 'se ele não tem um patter plano, criar um (desdobre o modelo)
osmcd.unfold ()
osmcd.flatpattern.exitedit ()
terminar se
dim fname as string = omodel. fullfilename 'get the document's path and name
'fname = microsoft.visualbasic.left (fname, len (fname) - 4) & ".dxf"
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------
dim opartnumber as string = omodel.propertysets.item ("informações do resumo do inventor"). item ("número da peça"). valor 'get the 3d document's part number
fname = opartnumber & ".dxf" 'assinar o número da peça à variável nome em vez do nome do arquivo
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------
dim sout as string = "flat pattern dxf? acadversion = r12 & rebasegeometry = true & outerprofilelayer = 0 & outerprofilelayercolor = 0; 0; 0 & interiorprofileslayer = 0 & interiorprofileslayercolor = 0; 0; 0 & invisível_coll; iv_arenters; iv_roll_tangent; iv_altrep_back
Tenta tentar.
osmcd.dataio.writedatatofile (sout, fname) 'export
captura
tentativa final
Próximo[/ QUOTE] [/ QUOTE]

 

[John2020]

Sr. Andrea,

Eu tentei o código como por você fornecido, mas ainda não funciona e o que eu recebo a mensagem de erro como abaixo aqui: - Não.

----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
erro em regra: regra 76, em documento: suporte de formulário canal_test.idw

erro não especificado (exceção de hresult: 0x80004005 (e_fail))

 

[John2020]

[QUOTE = "John2020, post: 460781, member: 90568"]Sr. Andrea,

Eu tentei o código como por você fornecido, mas ainda não funciona e o que eu recebo a mensagem de erro como abaixo aqui: - Não.

------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- - Não.
erro em regra: regra 76, em documento: suporte de formulário canal_test.idw

erro não especificado (exceção de hresult: 0x80004005 (e_fail))[/ QUOTE]querida erea,

muito obrigado, agora meu problema foi resolvido, apenas um menor mudou em conjuntos de omodelo.