'╭──────╮
'│www.sduw.com│
'╰──────╯
'功能:恢复IE工具栏的链接名称
'注意:关闭所有浏览器后生效
'
Set wso = CreateObject("WScript.Shell")
wso.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Toolbar\LinksFolderName","链接"
msgbox"修复成功!"