Board logo

标题: VBS创建IE右键菜单 [打印本页]

作者: cjiabing    时间: 2011-4-18 17:38     标题: VBS创建IE右键菜单

本帖最后由 cjiabing 于 2011-4-18 17:39 编辑

帮忙弄个东东——在IE上,创建右键菜单:“复制URL链接”、“使用暴风影音播放”或“添加到暴风影音播放列表”,实现浏览器超链接上可以右键播放音乐或电影。
我试着弄了一下,可以复制图片路径,到音乐路径时,一闪而过。可能在链接路径或者在设置那个十六进制的东西时出错。

不熟悉VB或JS,请大家帮忙,下面提供点资料:

或此路径:《通过修改注册表添加IE右键菜单》http://blog.csdn.net/brookes/archive/2008/03/11/2166050.aspx
以下资料可以实现,看得我头晕眼花,但可以参考:
其实就是类似当安装完 Flashget 后 Internet Explorer 的右键多了“使用网际快车下载”的选项一样,现在我们的需求是:当我们在图片右键时出现“复制图像地址”的选项。
其实很简单,先把下列代码存为 abc.reg 并导入:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\复制图像地址(&Z)]
@="C:\\CopyImageUrl.htm"
"contexts"=dword:00000002
并把下列代码存为 C:\CopyImageUrl.htm:
<script language="javascript" defer>
var Elem=external.menuArguments.event.srcElement;
var imgUrl='';
if(Elem.tagName=='IMG') imgUrl=Elem.src;
else if(Elem.tagName=='A'){
    var cElem=Elem.children;
    if(cElem.length){
        for(i=0; i<=cElem.length-1; i++){
            if(cElem.tagName=='IMG') imgUrl=cElem.src;
            break;
        }
    }
}
if(imgUrl) clipboardData.setData('text',imgUrl)
</script>
重启你的浏览器就可以用了。
要注意几点:
这个功能适用于 IE 和所有以 IE 为内核的第三方浏览器,比如 Mathxon。
“复制图像地址(&Z)”后面的符号 Z 为快捷键,根据不冲突又易按的原则,你至少还可以改为:q、w、x。
contexts 对应应用对象有:Default、Images、Controls、Tables、Text selection、Anchor、Unknown。
与 contexts 并列的,还有一个可选的双字节 Flags,值为 0x1 时,脚本将以窗口对话框方式执行。
如果脚本存在于某 dll 文件的 123 位置,还可以用“Example.dll, 123”这样的指向来定义。
快捷键
根据个人经验,熟练地使用这个功能,至少可以让操作快上 80% 的时间,甚至 Flashget 默认也没设置这个人性化的功能,遗憾。不过我们完全可以修改之,嘿嘿!
可选项
Value Constant_Name Description
0x01 CONTEXT_MENU_DEFAULT Shown on all context menus.
0x02 CONTEXT_MENU_IMAGE Context menu of images only.
0x04 CONTEXT_MENU_CONTROL Context menu of form controls only.
0x08 CONTEXT_MENU_TABLE Context menu of tables only.
0x10 CONTEXT_MENU_TEXTSELECT Context menu of selected text only, including images in a selected region.
0x20 CONTEXT_MENU_ANCHOR Context menu of links only. Does not include linked images or image maps.
0x40 CONTEXT_MENU_UNKNOWN Right-click on none of the above.
多种值综合应用是“或”的关系,比如需要在默认和连接时右键时显示,则 contexts=0x21;想单独在图片上显示,则 contexts=0x02 了。
举例
下面例子可以将页面在新窗口显示:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Show in New Window]
@="[url=file://c:\\example2.htm]file://c:\\example2.htm[/url]"
"Contexts"=dword:00000001
c:\example2.htm
<SCRIPT LANGUAGE="JavaScript" defer>
    window.open(external.menuArguments.location.href);
</SCRIPT>
下面例子可以将选中文字变为大写:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\My &Menu Item]
@="[url=file://c:\myscript.htm]file://c:\myscript.htm[/url]"
"Contexts"=dword:00000001
c:\myscript.htm
<SCRIPT LANGUAGE="JavaScript" defer>
   var parentwin = external.menuArguments;
   var doc = parentwin.document;
   var sel = doc.selection;
   var rng = sel.createRange();
   var str = new String(rng.text);
   if(str.length != 0) rng.text =  str.toUpperCase();
</SCRIPT>
效果

删除
将下列代码存为 unreg.reg 并导入就可以了:
Windows Registry Editor Version 5.00
[-HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\复制图像地址(&Z)]
参考
About the Browser
http://windowssdk.msdn.microsoft.com/en-gb/library/ms629731.aspx
Adding Entries to the Standard Context Menu
http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/ext/tutorials/context.asp
如何在右键菜单添加“拷贝图像地址”
http://forum.maxthon.com/index.php?showtopic=13228&st=0&p=87259
目前自己用的:
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt]

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\复制图像地址(&Z)]
@="D:\\Afly\\CopyImg.html"
"contexts"=dword:00000002

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\打开图像(&W)]
@="D:\\Afly\\OpenImg.html"
"contexts"=dword:00000002

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\播放该音乐(&M)]
@="D:\\Afly\\OpenMusic.html"
"Contexts"=dword:00000022

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\查询单词(&D)]
@="D:\\Afly\\OpenDict.html"
"contexts"=dword:00000030
<script language="javascript" defer>
   var rng = external.menuArguments.document.selection.createRange();
   var str = new String(rng.text);
   if(str.length == 0) str=external.menuArguments.event.srcElement.innerText;
   window.open("http://sh.dict.cn/search/?q="+str,"_search");  
</script>
<script language="javascript" defer>
var Elem=external.menuArguments.event.srcElement;
var imgUrl='';
var rng = external.menuArguments.document.selection.createRange();
var str = new String(rng.text);
if(Elem.tagName=='IMG') imgUrl=Elem.src;
else if(Elem.tagName=='A'){
    var cElem=Elem.children;
    if(cElem.length){
        for(i=0; i<=cElem.length-1; i++){
            if(cElem.tagName=='IMG') imgUrl=cElem.src;
            break;
        }
    }
}
else if(str.length != 0){
imgUrl =  str;
}
if(imgUrl) eval('wi'+'ndow.op'+'en(imgUrl,"_blank")');
</script>
<script language="javascript" defer>
var Elem=external.menuArguments.event.srcElement;
var MusicUrl="";
if(Elem.tagName=='IMG'){
MusicUrl=Elem.parentElement.href;
}
if(Elem.tagName=='A'){
MusicUrl=Elem.href;
}
window.open("[url=file://D:/Afly/Player.html?"+MusicUrl,]file://D:/Afly/Player.html?"+MusicUrl,'_blank','status=no,resizable=yes,width=350,height=250,left=250,top=130'[/url]);
//encodeURIComponent(MusicUrl)
</script>
<html>
<head>
<script language="javascript">
var url = document.location.search.substr(1);
window.onload=function() {
    if(url)WMP.URL=url;WMP.play();
}
</script>
</head>
<body style="margin:0;padding:0">
<div id="MusicBox" class="SideContent">
<object classid="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="WMP" width="100%" height="100%">
  <param name="URL" value="" />
  <param name="autoStart" value="1" />
  <param name="playCount" value="3" />
  <param name="rate" value="1" />
  <param name="enabled" value="1" />
  <param name="invokeURLs" value="-1" />
  <param name="volume" value="50" />
  <param name="mute" value="0" />
  <param name="uiMode" value="full" />
  <param name="stretchToFit" value="0" />
  <param name="windowlessVideo" value="1" />
  <param name="enableContextMenu" value="1" />
  <param name="fullScreen" value="0" />
  <param name="enableErrorDialogs" value="0" />
</object>
</div>
</body>
</html>
Permalink | Comments (5) | Hits: 11858 | Time: 0:38:34
MS06-014: msadco.dll 严重漏洞
自定义“搜索助手”
All Comments
#1 - James - 2006-12-2 16:51:12
佩服!
我这边想实现这样一个功能:在浏览器中的输入框内点右键时,出现“插入...”的标签,并可以将预定的内容粘贴到该位置。
这些内容是一个URL地址,或者是一段引用的网络上有格式的文字图片等,因为常用,所以不想每次都先去copy。
URL应该是固定的,但引用的内容可能有变化。
希望大侠能帮帮忙啦!
#2 - 洋洋 - 2006-12-19 13:26:29
现在就来试一下,hug
#3 - 5368 - 2010-2-6 0:32:08
感谢afly的代码!
不知在firefox中怎么自定义右键?
#4 - Afly - 2010-2-6 14:30:11
以上这些DIY的功能基本上FF也都有了。。。很多插件都有选项是否显示在右键;也有专门的菜单/右键的设置插件,但没专门研究过,估计也需要写配置代码之类的……
#5 - mingjiang - 2010-3-18 22:08:22


作者: cjiabing    时间: 2011-4-18 17:41

另外,注册表导入,在我们批处理这里可以直接用reg导入,其实就是一个“reg add”
作者: zhangop9    时间: 2021-1-2 18:33

IE右键菜单




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2