主页被篡改如何修复
1、新建记事本,例如:新建文本文档.txt。
2、打开新建文本文档.txt,粘贴如下内容:
dim WshShell
set WshShell = CreateObject("WScript.Shell")
Call SetStartPage("https://www.baidu.com") '设置新IE主页
MsgBox "设置完成!"
Function SetStartPage(url)
On Error Resume Next
WshShell.RegDelete "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\EUPP\"
WshShell.RegDelete "HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Main\EUPP\"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Start Page",url,"REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Default_Page_URL",url,"REG_SZ"
WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Main\Start Page",url,"REG_SZ"
WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Main\Default_Page_URL",url,"REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\First Home Page",url,"REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel\HomePage",&H00000001,"REG_DWORD"
End Function
其中第三行代码Call SetStartPage("https://www.baidu.com") 把其中网址为新的IE主页,根据自己需求更换即可。
4、然后按下“Ctrl+S”按键保存。
5、然后鼠标右键单击选择“重命名”。
6、修改步骤1文件的后缀,变成:新建文本文档.vbs。
7、双击文件运行,新建文本文档.vbs。
8、设置成功则会提示"设置完成!"。