test = createobject("Scripting.FileSystemObject").GetFolder(".").PathWscript.echo test
当前VBS路径
代码如下:
test = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.PathWscript.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 colItemslmq=lmq & objItem.CommandLine & vbcrlfNextWscript.Echo lmq