'╭──────╮
'│www.sduw.com│
'╰──────╯
'功能:恢复OE标题栏广告
'注意:需要把OE关闭后才能生效
'
Set wso = CreateObject("WScript.Shell")
wso.Regwrite "HKEY_CURRENT_USER\Software\Microsoft\Outlook Express\WindowTitle",""
msgbox"修复成功!"