Option Explicit
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")

Err.Clear
On Error Resume Next

WshShell.RegDelete "HKLM\Software\Microsoft\Windows\CurrentVersion\Run\Task Manager"
WshShell.RegDelete "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system\DisableTaskMgr"
WshShell.RegDelete "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system\DisableRegistryTools"
WshShell.RegDelete "HKCU\Software\Policies\Microsoft\Internet Explorer\Control Panel\HomePage"
WshShell.RegDelete "HKCU\Software\Yahoo\Pager\View\YMSGR_buzz\content url"
WshShell.RegDelete "HKCU\Software\Yahoo\Pager\View\\YMSGR_Launchcast\content url"
WshShell.RegDelete "HKCU\SOFTWARE\Microsoft\Internet Explorer\Main\Window Title"
WshShell.RegWrite "HKCU\SOFTWARE\Microsoft\Internet Explorer\Main\Start Page", "about:blank", "REG_SZ"

MsgBox "Dat lai HomePage thanh cong !", 4096, "Bkav FixReg"