Network Browsing in DCL?

[fletch97]

Is there a way to write a DCL and lisp to allow a user to see the network, browse around and than save the location and send it back to the lisp routine?

Thanks!

[aaronic_abacus]

(getfiled)

[fletch97]

The research I did says I should use this instead.....

(acet-ui-pickdir)

But I can't get it to work like I want?

[fletch97]

AutoCAD's helps gives the following for the definition of getfiled....

"Prompts the user for a file name with the standard AutoCAD file dialog box, and returns that file name".

But I don't need it to return a file name, I only want it to return the folder location.

[aaronic_abacus]

;This autolisp program gets the file path.



(defun c:gfl ()
(setq fl (getfiled "" "" " " 1))
(setq fll (strlen fl))
(setq ct fll)
(setq lp 1)
(while lp
(setq flc (substr fl ct 1))
(if (= flc "\\")
(progn
(setq fp (substr fl 1 ct))
(setq lp nil)
));end progn/if flc
(setq ct (- ct 1))
);end lp
(princ fp)
(princ)
);end gfl