HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Extensions\{1FBA04EE-3024-11D2-8F1F-0000F87ABD16} |
<script language="VBScript"> On Error Resume Next set NetAntsApi = CreateObject( "NetAnts.API" ) if err<>0 then Alert("NetAnts not properly installed on this PC!") else set links = external.menuArguments.document.links ReDim params(links.length*2) params(0)=external.menuArguments.document.Url for i = 0 to links.length-1 params(i*2+1)=links(i).href params(i*2+2)=links(i).innerText next NetAntsApi.AddUrlList params end if </script> |
<script> //userURL得到的是当前地址,例如是http://www.yesky.com userURL=external.menuArguments.location.href; protocolIndex=userURL.indexOf("://",4); serverIndex=userURL.indexOf("/",protocolIndex + 3); finalURL=userURL.substring(0,serverIndex); external.menuArguments.open(finalURL, "_blank");//打开网址; </script> |
④可执行文件
假如想让IE在按下按钮后执行一个可执行文件, 可以增加名为Exec的字串值,其值为此可执行文件的全路径,例如c:\windows\notepad.exe或者是一个网址http://www.yesky.net
有了上面的知识,就可以通过修改注册表来实现向IE工具条添加按钮的功能了。
二、编程步骤
1、启动Visual C++6.0,生成一个基于对话框的应用程序,将程序命名为"IEButton";
2、修改应用程序对话框中的按钮,其标题分别为"添加"和"退出";
3、使用Class Wizard为应用程序的"添加"按钮添加鼠标单击的消息响应函数OnAdd();
4、添加代码,编译运行程序。
三、程序代码
void CIEButtonDlg::OnAdd() { ///这是由GUIDGEN产生的GUID:{06926B30-424E-4f1c-8EE3-543CD96573DC} CRegKey reg; char KeyName[]="Software\\Microsoft\\Internet Explorer\\Extensions\\{06926B30-424E-4f1c-8EE3-543CD96573DC}"; TCHAR PathName[MAX_PATH]; TCHAR IconPathName[MAX_PATH]; ///正常时的图标全路径 TCHAR HotIconPathName[MAX_PATH]; ///鼠标覆盖时的图标全路径 GetModuleFileName(0,PathName,MAX_PATH); ///得到本可执行文件的路径 strcpy(IconPathName,PathName); strcpy(HotIconPathName,PathName); strcat(HotIconPathName,",131"); ///131是图标的ID,你可以以资源方式打开EXE文件就可以看到所有资源及其ID strcat(IconPathName,",129"); reg.Create(HKEY_LOCAL_MACHINE,KeyName); reg.SetValue("{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}","CLSID"); reg.SetValue("Yes","Default Visible"); reg.SetValue("天极网","ButtonText"); reg.SetValue(IconPathName,"Icon"); reg.SetValue(HotIconPathName,"HotIcon"); /////假如是执行脚本,可以是reg.SetValue("c:\\test.html","Script"); ///在test.html 存放你的脚本代码<br> reg.SetValue("http://www.yesky.com/","Exec");///打开网页 } |