(defun c:this () ;Open Explorer in Current folder (command "shell"
(strcat "explorer \"" (getvar "dwgprefix") "\"")
To use this, make sure that you have it loaded before you call it. Then at the command line you can simply type the word "this" to launch an explorer window. Hope you find it as useful as I have.