'╭──────╮
'│www.sduw.com│
'╰──────╯
'功能:恢复下载
'注意:重新启动或者注销生效
Set wso = CreateObject("WScript.Shell")
wso.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\1803",0,"REG_DWORD"
wso.RegWrite "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions\NoSelectDownloadDir",0,"REG_DWORD"
wso.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Internet Explorer\Restrictions\NoSelectDownloadDir",0,"REG_DWORD"
msgbox"修复成功!"