fs = Application.GetOpenFilename("Windows批次檔 (*.bat), *.bat")作者: lin 時間: 2013-9-25 09:19
下列巨集係執行於windows 7後,產生問題及思考解決方法如下:
Sub 掃描所有保護的系統檔案以及以正確的Microsoft版本替換不正確的版本()
o# = FreeFile: Open "C:\1.bat" For Output As o
Print #o, "@echo off"
Print #o, "sfc /scannow"
Print #o, "echo"
Close o#: Shell "C:\1.bat", 2
On Error Resume Next
End Sub