Red de conocimientos sobre prescripción popular - Conocimiento del confinamiento - Utilice la programación lisp, abra el dibujo D D:\1.dwg y utilice comandos de programación para crear una nueva carpeta en la ruta del dibujo. El comando es un.

Utilice la programación lisp, abra el dibujo D D:\1.dwg y utilice comandos de programación para crear una nueva carpeta en la ruta del dibujo. El comando es un.

Al escribir autolisp, preste atención a las siguientes condiciones:

El archivo dwg abierto debe guardarse.

Si la nueva carpeta no se crea correctamente, verifique si Express Tools está instalado en cad.

(Derun?c:tes?(?/?& amptr1?ff1?ff2)

(setq?ff1?" D:\ \ ​​​​A "); Crear carpeta

(If?(VXMAKEDIRECTORY?ff 1); Si la creación es exitosa

(Program

(setq?&tr1?(getvar?" dwgname ") ) ;Extraiga el nombre del archivo

(if?(setq?ff2?(findfile?&tr 1));Si encuentra este archivo,

(vl-file-copy?ff2? (strcat?ff1?"\\"?& amptr 1));Copiar el archivo a una nueva carpeta

)

)

)

p>

(princ)

); El comando appload carga autolisp, comandos TES y descargas de archivos adjuntos.