Ie 右键菜单怎么设置拜托各位大神

Ie 右键菜单怎么设置拜托各位大神,第1张

打开注册表编辑器,找到HKEY_LOCAL_MACHINE\Software\CLASSES\AllFilesystemObjects\shellex\ContextMenuHandlers这子键,这个子键下面应该有Send To这个子键,选中ContextMenuHandlers,点击鼠标右键,选择新建“主键”,然后命名为“Copy To”(没有引号,注意大小写和空格),然后修改右边的默认值为“{C2FBB630-2971-11D1-A18C-00C04FD75D13}”(没有引号,注意大小写和空格),然后重复上一个步骤,新建主键“Move To”(没有引号,注意大小写和空格),然后修改右边的默认值为“{C2FBB631-2971-11D1-A18C-00C04FD75D13}”(没有引号,注意大小写和空格)即可在Win98/2000/XP的右键菜单中实现这复制到、移动到这一功能。 IE的快速搜索:直接在IE的地址栏里面输入“google 搜索的内容”就可以直接调用Google搜索引擎搜索,根本没有必要打开Google的主页,这样做是不是很方便?想不想实现这样的功能呢?只要你看了下面的内容,一切都可以随心所欲了。 1)打开注册表编辑器,找到HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\SearchUrl,选中SearchUrl,点击鼠标右键,选择“新建主键”,命名为“Google”(没有引号,也可以命名为其他的名字,google代表在IE地址栏里面要输入的第一个内容),然后在右边把默认值修改为“ http://www.google.com/search?q=%s&hl=zh-CN ”(没有引号),然后新建一个字符串值,命名的时候敲一个空格,键值为“+”(没有引号),再建立一个字符串值,命名为“%”(没有引号),键值为“%25”(没有引号),再建立一个字符串值名字叫做“&”(没有引号),键值为“%26”(没有引号),最后建立一个字符串值名字叫做“+”(没有引号),键值为“%2B”(没有引号),完成以后打开IE,在地址栏里面输入”google 电脑报”看看有什么效果吧?怎么样?效果不错吧? 另外,如果你想使用Baidu的搜索引擎,只需要把新建的主键命名为Baidu,把默认值修改为“ http://www1.baidu.com/baidu?tn=baidu&word=%s ”即可(没有引号)。 有时在我们使用IE浏览器中,不知道什么原因窗口就变小了。每次重新启动时,都是这样一个小窗口,即便是用"最大化"按钮,还是无济于事。 其实这是IE自身所具有的一种"记忆"效应,即下次重新开启的窗口默认依从最前一次关闭时的状态。当然问题严重时,也会出现类似上面这种情况。 同样进入注册表编辑器,依次选择"HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\",在右边的窗口中删除"Window_Placement"键。 另外在"HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Old Work-Areas"右边窗口中删除"OldWorkAreaRects"键。 关闭注册表,重新启动计算机,连续两次最大化IE窗口("最大化"-"还原"-"最大化"),再次重新启动IE OK了。

1、在注册表HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt项下建立一个

新项,项的名称既出现在菜单中的标题,例如你想建立的菜单项标题为Add URL,则新建项的名称为

HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Add URL

2、将新建项的默认值设定为一个URL地址,当用户点击菜单项后,IE就会调用URL指向的页面中的脚

本,在目标页面的脚本中通过访问external对象的menuArguments属性就可以访问IE中的页面。该属性定

义了一个Window对象。该对象描述了浏览器中的一个打开的窗口。详细的帮助请参考MSDN中关于

InternetExplore object的帮助,熟悉了Window对象才可以比较好的了解下面的脚本。

对于如何实现自身的程序访问menuArguments的问题,我们可以仿效Netants的做法,首先建立一个

OLE Automation对象,然后在脚本中调用该对象,并将页面信息传递对象处理。下面通过Delphi建立对象

来说明:

打开Delphi,点击菜单: 文件|新建 ,选择窗口中的ActiveX标签,在列表中选择ActiveX Library

图标后按确定键,这样就新建了一个Active Library工程。然后将工程文件保存为IEContextMenu.dpr 。

再点击菜单: 文件|新建 ,选择窗口中的ActiveX标签,在列表中选择Automation Object 图标后按

确定键,然后在 Automation Object Wizard 窗口中的CoClass Name栏中输入IEMenu1后按确定键。

这时会d出IEContextMenu.tlb 的Type Library窗口,左边是对象和属性等的列表窗口,右边是相应的选

项窗口。在其中已经加入了IIEMenu1接口。

现在给接口添加一个AddURL方法。首先选择Type Library列表中的IIEMenu1项,然后点击Type Library

窗口上面的 New Method 按钮添加一个方法,将该方法的Name属性改为AddURL。下来再点击Parameters标签

转到参数设定页,添加两个参数:URL和Info,属性都设置为BSTR,设置好的Type Library窗口如图所示:

(附加图片1-1.bmp)

关闭设置窗口回到Delphi,点击save all按钮保存文件,现在IEMenu对象建立完毕了,在对象中我们将

只实现最简单的功能,既显示用户在页面中单击右键位置的对象URL,所以在Unit1的TIEMenu1.AddURL子程

序中只添加一句: showmessage(URL)

同时在Unit1的Uses中加入Dialogs。选择菜单上的Build | Build IEContextMenu 项编译生成

IEContextMenu.dll。

下面是注册对象,在资源管理器中将Windows\system目录下的Regsvr32.exe拷贝到IEContextMenu.dll

所在目录中,然后将IEContextMenu.dll图标拖到Regsvr32.exe上放开,这时Regsvr32.exe就会d出对话框

提示对象注册成功。

打开UltraEdit(或者其它文本编辑器)将下面的脚本代码输入编辑器中:

<script language="VBScript">

Sub OnContextMenu()

On Error Resume Next

set srcEvent = external.menuArguments.event

set EventElement = external.menuArguments.document.elementFromPoint(srcEvent.clientX, srcEvent.clientY)

set objNetSamp=CreateObject("IEContextMenu.IEMenu1")

if srcEvent.type = "MenuExtAnchor" then

set srcAnchor = EventElement

do until TypeName(srcAnchor)="HTMLAnchorElement"

set srcAnchor=srcAnchor.parentElement

Loop

Call objNetSamp.AddUrl(srcAnchor.href,srcAnchor.innerText)

elseif srcEvent.type="MenuExtImage" then

if TypeName(EventElement)="HTMLAreaElement" then

Call objNetSamp.AddUrl(EventElement.href,EventElement.Alt)

else

set srcImage = EventElement

set srcAnchor = srcImage.parentElement

do until TypeName(srcAnchor)="HTMLAnchorElement"

set srcAnchor=srcAnchor.parentElement

if TypeName(srcAnchor)="Nothing" then

call objNetSamp.AddUrl(srcImage.href,srcImage.Alt)

exit sub

end if

Loop

Call objNetSamp.AddUrl(srcAnchor.href, srcImage.Alt)

end if

elseif srcEvent.type="MenuExtUnknown" then

set srcAnchor = EventElement

do until TypeName(srcAnchor)="HTMLAnchorElement"

set srcAnchor=srcAnchor.parentElement

if TypeName(srcAnchor)="Nothing" then

Call objNetSamp.AddUrl(EventElement.href,EventElement.innerText)

exit sub

end if

Loop

end if

end Sub

call OnContextMenu()

</script>

将文件保存到c:\program files 下,文件名为 geturl.htm

从上面的脚本可以看到,首先访问external.menuArguments属性,获得用户单击鼠标右键位置的对象,然

后根据对象的不同获得它的URL,然后建立IEContextMenu.IEMenu1对象并调用该对象的AddURL方法。

接下来是为右键菜单建立注册项,打开UltraEdit(或者其它文本编辑器)将下面的注册数据输入编辑器中

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\&Get URL]

@="c:\\program files\\geturl.htm"

"Contexts"=dword:00000022

将文件以reg为后缀保存,然后在Windows资源管理器中双击该文件将注册项添加到注册表中,然后打开

IE,右键点击一个连接或者图片,在d出菜单中会出现一个Get URL项,点击该项,就会出现一个消息框显示

点击的连接或者图片的URL地址

下面再介绍一下上面注册项中Contexts项的作用,通过该项可以制定菜单项在右键点击IE中的什么对象时

出现,它可以为以下值的“或”组合:

对象 值

缺省 0x1

图片 0x2

控件 0x4

表单域 0x8

选择文本 0x10

锚点 0x20

例如上面我们希望菜单项在用户点击图片或者超链接时出现,那么我们就将值设置为dword:00000022,既在

点击图片 或者 锚点时出现菜单。一个锚点是页面中描述一个超链接的对象。如果不设置Contexts项,则菜单项

会在点击任何对象时出现在右键菜单中。

2、将新建项的默认值设定为一个URL地址,当用户点击菜单项后,IE就会调用URL指向的页面中的脚本,在目标页面的脚本中通过访问IE提供的external对象的menuArguments属性就可以访问IE中的页面中的各种对象,例如链接、图片、表单域、被选中的文本等。详细的帮助请参考MSDN中关于InternetExplore object的帮助,熟悉了Window对象才可以比较好的了解下面的脚本。

打开VB,点击菜单: File New ,在新建工程窗口中选择 ActiveX Dll 后按确定键建立一个ActiveX DLL工程。然后在工程列表窗口中将Class1的Name属性更改为NetAPI,然后在NetAPI的代码窗口中添加如下代码:

Public Sub AddURL(URL As String, Info As String)

MsgBox Info, vbOKOnly, URLEnd Sub保存文件,将工程文件保存成NetSamp.vbp。然后在菜单中选择 File Make NetSamp.dll建立对象动态连接库。

接下来是注册库,在Windows目录下找到Regsvr32.exe,然后将其拷贝到netsamp.dll所在目录下,将netsamp.dll的的图标拖到Regsvr32.exe上放开,这时Regsvr32.exe就会d出对话框提示对象注册成功。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11945832.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存