CMD当前路径

代码如下:

test=createobject("Scripting.FileSystemObject").GetFolder(".").Path

Wscript.echotest

当前VBS路径

代码如下:

test=createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path

Wscript.echotest

代码如下:

strComputer="."

SetobjWMIService=GetObject("winmgmts:\\"&strComputer&"\root\cimv2")

SetcolItems=objWMIService.ExecQuery("Select*FromWin32_ProcessWhereName='wscript.exe'ORName='cscript.exe'")

ForEachobjItemincolItems

lmq=lmq&objItem.CommandLine&vbcrlf

Next

Wscript.Echolmq

如何获得当前.vbs文件运行的目录

比方说c:\a\a.vbs，如何或得它的目录c:\a，如果把它放在d:\b\b\目录下，获得它的目录为d:\b\b呢？

代码如下:

functiongetfolder()

getfolder=left(wscript.scriptfullname,instrrev(wscript.scriptfullname,"\")-1)

endfunction

MsgBoxgetfolder()

更多信息请查看IT技术专栏