topic Re: Autocad lisp point specific folder in Visual LISP, AutoLISP and General Customization Forum

Autocad lisp point specific folder

morgan.bouchaud — Thu, 30 Jun 2022 13:27:54 GMT

Hi everybody, thanks for the acceptance on this forum.

Sorry for my english. I work in an Architecture Company based in France as a Graphic designer, I usually use Sketchup for modelling and Enscape for rendering.

I'm totally a newbie using autocad lisp and I'm trying to figure out how it works. Also trying to help a colleague.

Here's my problem/question:

I'm using an existing lisp allowing me to rename several blocks in different *.dwg files. In this way I can save time.

Unfortunately, a window box appears and asks me to choose my Folder. So I have to expand all the folders 'till the good one.

I suppose that the command in the lisp is this one:

(setq oFolder (vlax-invoke
oShell
'BrowseForFolder
(vla-get-hwnd acApp)
"Select folder to process:"
0
(+ 1 64 256)

But what I want is to go directly to the drawing directory so I can select the files quickly instead of expanding everything that's before.

Here are some screenshots

The code

The dialog box I get

Thanks

Re: Autocad lisp point specific folder

Sea-Haven — Fri, 01 Jul 2022 00:56:37 GMT

Have a look at this "Getfiled"

Help: getfiled (AutoLISP) (autodesk.com)

May be a french version.

Re: Autocad lisp point specific folder

paullimapa — Tue, 05 Jul 2022 04:39:13 GMT

If you have Express Tools then the following code will work:

(if(and(member "acetutil.arx"(arx))acet-ui-getfile)(acet-ui-pickdir "Select Item" (getvar"dwgprefix") "Select Folder to Process")(alert"AutoCAD Express Tools Not Found"))

Re: Autocad lisp point specific folder

ronjonp — Tue, 05 Jul 2022 20:13:10 GMT

Take a look HERE