摘要：
Set objShell = CreateObject("WScript.Shell") strCommondLine = "powershell.exe" app = objShell.Run(strCommondLine) objShell.AppActivate app WScript.Sle 阅读全文
摘要：
Dim W3SVC,WebServer,Bindings,ALLBindingInfo,fs,TextFilePath,WebSiteName On Error Resume Next Err.Clear Set fs = WScript.CreateObject("Scripting.FileSy 阅读全文