在右键菜单上添加“查找目标”快捷按钮
在右键菜单上添加“查找目标”快捷按钮,原创意来源于这
http://hi.baidu.com/zhiga/blog/item/abecba3edf1fa1fa828b133b.html网页上,本人看过后感觉有些较复杂,如果是直接转贴过来对于菜鸟们操作起来较麻烦,所以经过考虑还是编辑一个小小的脚本程序就要方便多了,只要将下面的“蓝绿色”字符保存为文件名为“czmb.vbs”并且放到D盘新建的一个文件名叫“查找目标”的文件夹,再将下面的“红色”字符保存为文件名为“查找.inf”同时也放到D盘新建的一个文件名叫“查找目标”的文件夹再用它安装一下即可。完成这几项操作之后,这时在桌面的任意快捷方式键上击右键即可见效,参见下面的图片1和图片2。
Set OS = GetObject("winmgmts:\\.\root\cimv2")
Set CF = OS.ExecQuery("Select * From Win32_ShortcutFile WHERE Name = '" & Replace(WScript.Arguments(0),"\","\\") & "'")
Set WS = WScript.CreateObject("WScript.Shell")
For Each objFile in CF
WS.Run ("explorer /e,/select," & objFile.Target)
Next
将上面的“蓝绿色”字符保存为文件名为“czmb.vbs”,并且放到D盘根目录下新建立一个叫“查找目标”新文件夹里,下面的“红色”字符保存为文件名为“查找.inf”然后用保存为红色字符的“查找.inf”文件在击右键菜单上选择“安装”
[version]
Signature=$CHICAGO$
[defaultinstall]
addreg=My.add.reg
[My.add.reg]
HKCR,lnkfile\shell\查找目标,,,"查找目标"
HKCR,lnkfile\shell\查找目标\command,,0x00020000,"%WINDir%\system32\WScript.exe D:\查找目标\czmb.vbs """%1""""
HKCR,lnkfile\shell\查找目标\ddeexec\Topic,,,"System"
图片1
图片2