'╭──────╮
'│www.sduw.com│
'╰──────╯
'功能:修复网页中右键菜单的广告
'注意:关闭所有浏览器后生效
'
msgbox "如果注册表中没有右键菜单的广告信息,那么本程序将会出错."
Set wso = CreateObject("WScript.Shell")
wso.Regdelete "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\"
msgbox"修复成功!"