标题 | vbs获取当前路径的代码 |
范文 | 有时候我们需要获取执行当前vbs的路径,那么就可以参考下面的代码,一般用来可以删除自身等操作 CMD当前路径 代码如下: test = createobject("Scripting.FileSystemObject").GetFolder(".").Path Wscript.echo test 当前VBS路径 代码如下: test = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path Wscript.echo test 代码如下: strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * From Win32_Process Where Name = 'wscript.exe' OR Name = 'cscript.exe'") For Each objItem in colItems lmq=lmq & objItem.CommandLine & vbcrlf Next Wscript.Echo lmq 如何获得当前.vbs文件运行的目录 比方说c:\a\a.vbs,如何或得它的目录c:\a,如果把它放在d:\b\b\目录下,获得它的目录为d:\b\b呢? 代码如下: function getfolder() getfolder=left(wscript.scriptfullname,instrrev(wscript.scriptfullname,"\")-1) end function MsgBox getfolder() |
随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。