VBS打开当前脚本所在文件夹

所属分类: 脚本专栏 / vbs 阅读数: 1455
收藏 0 赞 0 分享

方法一: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

是不是更简单呢,这篇文章就分享到这了,希望大家以后多多支持脚本之家。

更多精彩内容其他人还在看

用vbs实现读取文本文件的方法

用vbs实现读取文本文件的方法
收藏 0 赞 0 分享

一个实现VBS倒计时的代码

一个实现VBS倒计时的代码
收藏 0 赞 0 分享

用vbs实现将剪切板的unix格式的内容处理成pc格式的代码

用vbs实现将剪切板的unix格式的内容处理成pc格式的代码
收藏 0 赞 0 分享

用vb和vbs 破解flashxp的密码的代码

用vb和vbs 破解flashxp的密码的代码
收藏 0 赞 0 分享

用VBS实现的批量gb2312转utf-8,支持拖动

用VBS实现的批量gb2312转utf-8,支持拖动
收藏 0 赞 0 分享

用vbs实现的XP序列号替换器

用vbs实现的XP序列号替换器
收藏 0 赞 0 分享

VBS可以做什么的简单说明

VBS可以做什么的简单说明
收藏 0 赞 0 分享

用vbs实现cmd功能的代码

用vbs实现cmd功能的代码
收藏 0 赞 0 分享

VBS基础编程教程 (第1篇)

发现大部分黑白的朋友都不会编程, 这可不是件好事, 所以这次我就写了一个简单的编程教程, 讲一下VBScript. 主要面向菜鸟, 懂得编程的朋友就不要浪费时间了
收藏 0 赞 0 分享

VBS编程教程 (第2篇)

VBS编程教程 (第2篇)
收藏 0 赞 0 分享
查看更多