Internet Information Server (IIS)
IIS 5.x
Web Sites
V erify Web Server Status
' 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
|
VbsEdit includes all these samples!
Download Now!
Version 5.4.1 - This package includes VbsEdit 32-bit, VbsEdit 64-bit, HtaEdit 32-bit and HtaEdit 64-bit.
The evaluation version never expires.
Home
|