Support Paths

Hi,

Does anyone know what sting i need to put into my acaddoc.lsp file to add a support path to all my users?

Cheer

Bob T.

 

Perhaps ...

Code:

(defun AddSupportPath ( Path )
(vlax-put-property
(vlax-get-property
(vlax-get-property
(vlax-get-acad-object)
'Preferences
)
'Files
)
'SupportPath
(strcat
(getvar "acadprefix")
";"
Path
)
)
)

You may wish to examine the existing path to ensure whether or not you actually need to add the additional path.

Cheers.

 

Cheers, Will this try and add the path if it already exists or will it ignore it?