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"