Schöck
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Возможно ли написать LISP для сохранения выбранных файлов dwg в заранее заданную папку под тем же именем и с внедрением всех внешних ссылок, которые в них есть?

Возможно ли написать LISP для сохранения выбранных файлов dwg в заранее заданную папку под тем же именем и с внедрением всех внешних ссылок, которые в них есть?

Ответ
Поиск в этой теме
Непрочитано 10.01.2020, 15:41 #1
Возможно ли написать LISP для сохранения выбранных файлов dwg в заранее заданную папку под тем же именем и с внедрением всех внешних ссылок, которые в них есть?
Ojster
 
Регистрация: 03.08.2019
Сообщений: 2

Всем привет!
По работе мне постоянно приходится проводить одну и ту же процедуру:
открыть файл -> сохранить как -> выбрать папку для сохранения (адрес меняется раз в год) -> внедрить все внешние ссылки (использую макрос на LISP) -> закрыть сохраненный файл

Проблема в количестве файлов и длинном пути к архивной папке (да, у нас так организован архив версий чертежей..)

Возможно ли автоматизировать этот процесс?

Как я себе это представляю:
Вариант 1 (в идеале) - мы запускаем макрос - появляется окошко для выбора файлов, в котором мы выделяем нужные нам файлы (либо, как вариант, указываем папку с исходными файлами) и после нажатия кнопки OK, копии выделенных файлов сохраняются в заранее заданную папку с теми же именами, но с внедренными внешними ссылками.
Вариант 2 (тоже норм) - мы открываем каждый файл по-отдельности и при запуске макроса этот файл "сохраняется как" в заранее указанную папку, после чего внедряются все внешние ссылки

Прошу помочь, кто в этом шарит!

P.S. Сечас для внедрения всех внешних ссылок использую такой LISP:

Код:
[Выделить все]
 (defun C:BINDALL ()
  (vl-load-com)
  (vlax-for i (vla-get-blocks
                (vla-get-activedocument (vlax-get-acad-object))
              ) ;_ end of vla-get-blocks
    (if (equal (vla-get-isxref i) :vlax-true)
      (vl-catch-all-apply 'vla-bind (list i :vlax-false))
    ) ;_ end of if
  ) ;_ end of vlax-for
  (princ)
) ;_ end
Просмотров: 415
 
Непрочитано 10.01.2020, 15:47
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 37,240


А обычного _.etransmit недостаточно?
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 10.01.2020, 15:52
#3
Ojster


 
Регистрация: 03.08.2019
Сообщений: 2


Офигеть..! Круто! Спасибо огромное!!!
Ojster вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Возможно ли написать LISP для сохранения выбранных файлов dwg в заранее заданную папку под тем же именем и с внедрением всех внешних ссылок, которые в них есть?

Инженерная школа
Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Инвертировать отражение слоев внешних ссылок при открытии файла d.mOnII AutoCAD 12 15.12.2019 21:36
Обновление путей внешних ссылок при пересохранении чертежа - как убрать d.mOnII AutoCAD 0 03.12.2019 03:42
Слои внешних ссылок Werwolf AutoCAD 19 16.04.2015 20:48
Как сделать разрезы чертежа 3D (сделаного при помощи внешних ссылок) Andriy AutoCAD 4 03.02.2013 21:53
Как сделать, чтобы файлы, подгруженные через Raster Image Refаerence оставались в чертеже без сохранения исходных файлов в папке? Данила123456 AutoCAD 6 18.05.2011 22:06