' V erify Web Server Status


strComputer = "LocalHost"
Set objIIS = GetObject("IIS://" & strComputer & "/W3SVC/2142295254")
intStatus = objIIS.Status

Select Case intStatus
    Case 1 Wscript.Echo "The Web server is starting."
    Case 2 Wscript.Echo "The Web server is running."
    Case 3 Wscript.Echo "The Web server is stopping."
    Case 4 Wscript.Echo "The Web server is stopped."
    Case 5 Wscript.Echo "The Web server is pausing."
    Case 6 Wscript.Echo "The Web server is paused."
    Case 7 Wscript.Echo "The Web server is continuing."
End Select
search for scripts

VbsEdit contains all these sample scripts!


Download Now!



Download   Home   Scripts

Copyright © 2001-2024 adersοft