| 内容 |
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() |