Set a = CreateObject("WScript.Shell")
a.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\1803",0,"REG_DWORD"
a.RegWrite "HKCU\Software\Policies\Microsoft\Internet Explorer\","Res"
a.RegDelete "HKCU\Software\Policies\Microsoft\Internet Explorer\"
a.run"rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl"
将以上内容另存为VBS文件运行即可
WWW.ByPro.NET
http://www.chinaaspx.com/
http://www.cnblogs.com/