mattiar
Guest
Bom dia, eu preciso converter um grande número de arquivos de .d para .e2
Pode dizer-me uma maneira rápida, por favor?
Obrigado com antecedência
Pode dizer-me uma maneira rápida, por favor?
Obrigado com antecedência
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Olá.para fazer esta atividade, você pode usar abelhas do thinkdesign como segue:
Escrevo em vbs para simplicidade
dim converter de
dim convertido
O que é isso?
parâmetros de configuração inicial rem
- Não. Formato de partidaconvertido="e2" Formulário de entradaobjstartfolder = "c:\" «Directiva a analisarset objfso = createobject("scripting.filesystemobject")
set objfolder = objfso.getfolder (objstartfolder)
- Não.
Dim activedoc
novo nome
set td = createobject("td_appl.application")
Td.visible=true
td.interactive=true
set colfiles = objfolder. arquivos
Dim spname
para cada objfile em colfiles
msgbox "aaa" & objfile. Nome
spname=split(objfile.name,".")
if(ubound(spname)>0) then
if(spname(1)=convertfrom) then
filetoopen=objstartfolder+"\" +objfile.name
msgbox "aaa" & filetoopen
set activedoc=td.documents.open(filetoopen)
newname=objstartfolder &"\c_"+spname(0)&".
activedoc.saveas(nome novo)
activedoc.close()
terminar se
terminar se
Próximo
você já fez o mesmo pedido em dois outros fios... não faz sentido repetir em todos os fios que falam sobre conversão.Olá.
Eu teria o mesmo problema.
Eu estou na posse da licença, mas eu precisaria entender como fazer uma conversão maciça de .e2 para dwg (ou dxf) e pdf.
Obrigado.