[Serhio163]

Здравствуйте.
Имею собственноручно написанную программку (на VBA, но это неважно), которая пакетно обрабатывает кучу .dwg файлов
После некоторых операций с чертежом нужно выполнить экспорт чертежа в формат мапинфо .tab
Посылаю в командную строку "ThisDrawing.SendCommand "_-mapexport", выходит диалоговое окно "Папка для экспорта"
Подскажите пожалуйста, как в командной строке задать параметры команде "_mapexport" (чтобы пропустить диалоговые окна)?
Т.е. нужно задать путь/тип файла для экспорта, файл профиля, выполнение экспорта...
Файлов чертежей много, они периодически корректируются и опять нужна выгрузка в .tab, поэтому очень хочется минимизировать ручные тыкания. Спасибо.

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

У команды есть вариант вызова через ком.строку? Т.е. _.-mapexport ?

[trir]

(command "-mapexport" "SHP" "c:\\Temp\\MyTest.shp" "Y" "c:\\Temp\\Street.epf" "S" "L" "All" "*" "*" "No" "Proceed")

https://forums.autodesk.com/t5/autoc...f/td-p/3430973

https://adndevblog.typepad.com/infra...shp-file-.html

Учи C# https://adn-cis.org/forum/index.php?...33118#msg33118

[Serhio163]

Сообщение от Кулик Алексей aka kpblc У команды есть вариант вызова через ком.строку? Т.е. _.-mapexport ?

Да, есть)
Если отправить (VBA) ThisDrawing.SendCommand "_-mapexport" & vbCr & "нет" & vbCr & "выполнить" & vbCr, то появляется диалог папки экспорта, после ручного ввода имени файла программа выполняется до конца нормально, вот и хочется узнать, как задать в КС параметр "адрес/имя файла"

----- добавлено через ~5 мин. -----

Сообщение от trir Учи C# https://adn-cis.org/forum/index.php?...33118#msg33118

Спасибо) я vba немного освоил (из excell с ним пришел), поэтому на нем писал свою программку, а так то есть мысли о смене языка)
в данный момент есть конкретная потребность и мало времени)

[trir]

https://help.autodesk.com/view/MAP/2...3-E6CBAF3F1157

[Serhio163]

Сообщение от trir https://help.autodesk.com/view/MAP/2...3-E6CBAF3F1157

С файлом профиля экспорта нет проблем... (он не нужен)
пишу "ThisDrawing.SendCommand "_-mapexport" & vbCr & "_No" & vbCr & "_Proceed" & vbCr" - команда выполняется до конца, но только после ручного ввода в диалоговое окно "куда сохранять"
пишу ..."_-mapexport" & vbCr & "SHP" & vbCr & "F:\... после отправки команды "_-mapexport" сразу появляется этот же диалог... потом ругается на Неправильное ключевое слово

нипонятна(

[trir]

А FILEDIA на что?

[Serhio163]

Сообщение от trir А FILEDIA на что?

Спасибище за наводку, это помогло! дефис перед командой не выводит диалог.
Если создать сначала всю строку команды "comStr = "(command ""-mapexport"" ""MITAB"" ""F:\\Новая\\877.tab"" ""_NO"" ""_Proceed"")" & vbCr"
а потом её отправить в командную строку, то всё работает (но в папке не должно быть файла с этим именем, иначе в кс возникает вопрос о замене)


Спасибище за наводку, это помогло! дефис перед командой не выводит диалог.
Если создать сначала всю строку команды "comStr = "(command ""-mapexport"" ""MITAB"" ""F:\\Новая\\877.tab"" ""_NO"" ""_Proceed"")" & vbCr"
а потом её отправить в командную строку, то всё работает (но в папке не должно быть файла с этим именем, иначе в кс возникает вопрос о замене)

Сообщение от trir А FILEDIA на что?

Спасибище за наводку, это помогло! дефис перед командой не выводит диалог.Если создать сначала всю строку команды "comStr = "(command ""-mapexport"" ""MITAB"" ""F:\\Новая\\877.tab"" ""_NO"" ""_Proceed"")" & vbCr"а потом её отправить в командную строку, то всё работает (но в папке не должно быть файла с этим именем, иначе в кс возникает вопрос о замене)

Сообщение от trir А FILEDIA на что?

Спасибище за наводку, это помогло! дефис перед командой не выводит диалог.
Если создать сначала всю строку команды "comStr = "(command ""-mapexport"" ""MITAB"" ""F:\\Новая\\877.tab"" ""_NO"" ""_Proceed"")" & vbCr"
а потом её отправить в командную строку, то всё работает (но в папке не должно быть файла с этим именем, иначе в кс возникает вопрос о замене)


Спасибище за наводку, это помогло! дефис перед командой не выводит диалог.
Если создать сначала всю строку команды "comStr = "(command ""-mapexport"" ""MITAB"" ""F:\\Новая\\877.tab"" ""_NO"" ""_Proceed"")" & vbCr"
а потом её отправить в командную строку, то всё работает (но в папке не должно быть файла с этим именем, иначе в кс возникает вопрос о замене)