标题 | vbs 获取当前目录的实现代码 |
内容 | 获取当前正执行的VBS的路径,通过Scripting.FileSystemObject组件实现 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() |
随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。