[игорёк]

Столкнулся с экспортом большого количества файлов.
Попробовал написать прогу для автоматизации, но столкнулся с проблемой. Чтоб ввести команду (_AecExportToAutoCAD2004) в ком. стр. нужно активизировать файл а на лиспе это критично.
Знаю можно попробовать через Activ-X, но к чертежу применим только метод Export. Может кто подскажет как это сделать?
В идеале хотелось бы указать каталог и чтоб ко всем файлам внутри каталога был применен экпорт.

[Кулик Алексей aka kpblc]

Пиши скрипт... Другого решения "навскидку" лично я не вижу.
Хотя... Файлы все из одного проекта? Если да, попробуй целиком проект экспортировать.

[игорёк]

Пиши скрипт...

Так прийдется открывать все файлы....
Неужели невозможно применить _AecExportToAutoCAD2004 к файлу через Activ-X?

[игорёк]

Наверно можно через VBA.
Меня удивил еще тот факт что при добавлении к команде "-" она не распознается, а ведь должна работать в командном режиме....

[Sleekka]

Пиши скрипт... Другого решения "навскидку" лично я не вижу. Хотя... Файлы все из одного проекта? Если да, попробуй целиком проект экспортировать.

крыс - дело говорит, только я че-то подзабил на это, потому что ezscript не хотел запускать ADT, но скрипт ручами можно запустить из проги - тока щас доперло, кстати никто не знает как запустить адт, ведь это ярлык автогада только с какими-то доп прописями, если кто нибудь обяснит - что ето за зверь буду очень благодарен.

[Кулик Алексей aka kpblc]

Если посмотреть на свойства ярлыка, да еще вспомнить дополнительно про справку, то становится очевидным:
- свойства ярлыка (к примеру): "C:\Program Files\AutoCAD Architecture 2008\acad.exe" /ld "C:\Program Files\AutoCAD Architecture 2008\AecBase.dbx" /p "AutoCAD Architecture (метрические единицы)"
в кавычках потому, что в именах есть пробелы
/ld : загружается указанное arx или dbx приложение.
/p : имя профиля.
Вот в общем-то и все.
Теперь насчет _aecexporttoautocad2004: а если сделать filedia -> 0, cmddia -> 0 и попробовать все же посылать именно команду?
Хотя... Есть еще один вариант - тому, кто будет получать, поставить соответствующий ObjectEnabler с usa.autodesk.com и не пачкать мозги

[VVA]

Когда-то делал связку bat + scr : http://dwg.ru/f/showthread.php?t=4908
bat для запуска Автокада, scr для запуска лиспа и/или выполнения команд

кстати никто не знает как запустить адт, ведь это ярлык автогада только с какими-то доп прописями,

Попробывал запустить Raster Design (за неимением ADT). Там тоже ярлычки
Вот мой вариант файла main.bat

Код:

[Выделить все]

ECHO OFF
Set ACADRUN="C:\Program Files\AutoCAD 2004\acad.exe" /LD "C:\Program Files\Raster Design 2004\AeciUi40.arx"
md GOTOVO
FOR %%A IN (*.DWG) DO %ACADRUN% %%A /B layren.SCR

Нужно в ACADRUN попробывать записать значение из ярлычка ADT

[игорёк]

а если сделать filedia -> 0

Спасибо! помогло!
Теперь осталось макрос на VBA написать. Перебрать все файлы dwg в указанном каталоге и послать в ком строку
(command "_AecExportToAutoCAD2004" "name.dwg") открывая и активизируя файлы по очереди.
ну не забыть потом востановить filedia конечно.
На мой взгляд это самый простой способ...

[Кулик Алексей aka kpblc]

Я не помню, поэтому проверь: а файл часом активироваться не будет после выполнения Application.Documents.Open? Потому как на VB6 при обращении к AutoCAD'у оно активировало...