方法一：Wscript.ScriptFullName
'创建一个 Wscript.Shell 对象的实例,稍后会使用这个对象启动 Windows 资源管理器
Set objShell = CreateObject("Wscript.Shell")
'获取脚本的路径
strPath = Wscript.ScriptFullName
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPath)
'获取脚本当前所在文件夹的路径
strFolder = objFSO.GetParentFolderName(objFile)
strPath = "explorer.exe /e," & strFolder
'启动 Windows 资源管理器,打开脚本所在的文件夹
objShell.Run strPath
方法二：objShell.CurrentDirectory
这种方法代码少了一些
set objShell = CreateObject("Wscript.Shell")
'脚本的当前目录
strPath = objShell.CurrentDirectory
strPath = "explorer.exe /e," & strPath
objShell.Run strPath
下面是寻技术小编的补充
如果是脚本中需要调用下面很简单的一句话就可以获取当前目录
currentpath = createobject("Scripting.FileSystemObject").GetFolder(".").Path
或
currentpath = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path
是不是更简单呢，这篇文章就分享到这了，希望大家以后多多支持寻技术。
版权声明：除特别声明外，本站所有文章皆是本站原创，转载请以超链接形式注明出处！
