'╭──────╮
'│www.sduw.com│
'╰──────╯
'功能:恢复EXE文件打开方式
'注意:马上生效
Set wso = CreateObject("WScript.Shell")
wso.regwrite "HKEY_CLASSES_ROOT\exefile\shell\open\command\","%1 %*"
msgbox"修复成功!"