Topic: Save and Load support paths.

[hudster]

Found this whilst on a net trawl and thought someone might find it usefull.

Code: [Select]

;;; Copyright (C) 1997-2003 JTB World, All Rights Reserved
;;; Website: www.jtbworld.com / http://jtbworld.vze.com
;;; E-mail: info@jtbworld.com / jtbworld@hotmail.com
;;;
;;; Save and loads support paths to a text file
;;;
;;; Change the path as wished

(defun C:saveSupportPaths (/ files paths f)
  (vl-load-com)
  (setq files (vla-get-files (vla-get-preferences (vlax-get-acad-object))))
  (setq paths (vla-get-supportpath files))
  (setq f (open "c:\\paths.txt" "w"))
  (write-line paths f)
  (close f)
  (princ)
)

(defun C:loadSupportPaths (/ files paths f)
  (vl-load-com)
  (setq files (vla-get-files (vla-get-preferences (vlax-get-acad-object))))
  (setq f (open "c:\\paths.txt" "r"))
  (setq paths (read-line f))
  (close f)
  (vla-put-supportpath files paths)
  (princ)
)

[CAB]

Thanks Hudster.

[ELOQUINTET]

that's pretty sweet thanks hudster

[t-bear]

Looks like I'm gonna have to bust one of our stations down to brain-dead this weekend and start over.  This and some other "goodies" from here will make this onerous task much simpler.  Thanks to all you gurus out there.  Life is much sweeter with your input......

[dubb]

i can use this....thanks!

[SPDCad]

Warning to all those of you who may use this little programme.
There is a limit to the number of paths you can put into your support path file.  I can't recall the limit but one day I did try to find out the limit just as an experimentation and I did find that it not that big.  I was thinking of adding all my block directory search paths to the list. Unfortunately I was unable to do so. To many directories

[dubb]

yea....does it matter whether or not the workstations have to have the same operating systems,and autocad release to share this command?