set args = WScript.Arguments
linkname = args(0)
set wshshell = CreateObject("WScript.Shell")
set scut = wshshell.CreateShortcut(linkname)
set fs = CreateObject("Scripting.FileSystemObject")
folder = """" & fs.GetParentFolderName(scut.TargetPath) & """"
wshshell.Run(folder)
这一段是VBS代码。里面有个BUG。附件是安装卸载的BAT.其中包括了VBS代码。
这是一个给快捷方式添加右键【打开所在位置】的程序，功能是右键点击以后打开快捷方式的相应目录。
功能类似于右键属性-查找目标，但是不同的是可以不用查看属性，而且查找目标是选定目标，而打开所在位置是直接打开快捷方式的对应文件夹没有选定目标。
我提出来的问题是，这个VBS运行起来有个BUG，其实这个VBS在网上广为流传，无意中发现便希望兄弟们解决一下问题修复下BUG，完善程序。
例如说：我在桌面上有个maxthon的快捷方式，对应程序是E:\Maxthon\Maxthon.exe
如果同时拥有程序E:\Maxthon.exe （即在E盘存在文件maxthon.exe）
那么在maxthon右键打开所在位置的时候，是在运行E:\Maxthon.exe，当然了，如果没有E:\Maxthon.exe是能实现功能的，这就是BUG。
希望各位能修复一下，就算存在文件E:\Maxthon.exe也能照常进入到快捷方式的对应文件夹。
[ Last edited by kidzgy on 2009-8-7 at 08:56 ]
附件
打开所在位置插件.rar (1.25 KiB, 下载次数: 11)
