Topic: Open to directory not working anymore

[ELOQUINTET]

Hey guys I have this little lisp routine that would open explorer to the current folder but it has recently stopped working.

(defun C:DIRR ()(COMMAND ".BROWSER" (GETVAR "DWGPREFIX")))

I get the message:

createprocess:file not found
internet browser not found

I know it is probably due to the fact that I recently upgraded my internet explorer to 7 but how can I fix this?

[ronjonp]

See if this one works:

Code: [Select]

(defun c:dirr (/)
  (startapp "explorer" (strcat "/e," (getvar 'dwgprefix)))
)

[ELOQUINTET]

ah yes thank you so much ron. you never realize how much you miss something until it's gone. gracias

[terrycadd]

Now that's cool!  I use the keyboard shortcut [Windows_Key + E], which just brings up Explorer.  Now I need to add your idea to my shortcut commands.

Muchas Gracias.  Eres Rey!

[Guest]

I use a slightly different version which will automatically highlight the drawing in the Windows Explorer folder.

Code: [Select]

(defun C:WinExplorer ( / )
   (STARTAPP (strcat "EXPLORER /select, " (getvar "dwgprefix") (getvar "dwgname")", /e"))
   (princ)
)

[ronjonp]

I like it

[Patrick_35]

Hi
For the fun with Activex

Code: [Select]

(defun explore(dir / sh)
  (vlax-invoke-method (setq sh (vlax-create-object "Shell.Application")) 'explore dir)
  (vlax-release-object sh)
)

Code: [Select]

(explore "c:\\windows")
@+