ASP-FastBoard - Demo/Support-Forum
Forum anmelden / register Board



SearchSearch CalendarCalendar GalleryGalleryAuction-PortalAuctions GlobalGlobal Top-ListTopMembersMembers StatisticsStats
get your RSS-Feed
Language/Sprache:  Admin  
 Login: ChatChat (0) new User-MapUser-Mapsend Passwordsend Password RegisterRegister

Forum Overview » Programmieren » ASP » Webserverstatus über Internet überprüfen
Pages: (1) [1] »
Registration necessaryRegistration necessary
Webserverstatus über Internet überprüfen
Cyberlordno Access no Access first Post cannot be deleted -> delete the whole Topic 
Group: Administrator
Level: heavy Spammer


Posts: 3607
Joined: 3/11/2004
IP-Address: saved
offline


Mit diesem Script könnt ihr auf einer Webseite anzeigen, ob ein anderer Webserver erreichbar ist und läuft.

<%
s1URL = "http://www.cyberlord.at"
response.write "Webserver 1<br>"
iStatus = 0
set obj = Server.CreateObject("MSXML2.XMLHTTP.4.0")
On Error Resume Next
obj.open "Get", s1URL, False
obj.send ""
If err.number = 0 then
iStatus = obj.Status
End if
If iStatus = 200 then
Response.Write "<a href='"& s1URL &"' target=_blank><font color=green>Online/font></a>"
else
Response.Write "<font color=red>Offline</font>"
End if
%>

Benötigt wird der IIS-Webserver und der XML-Parser.



edited by Cyberlord on 11/25/2004 8:21:21 PM
Forum-Changelog || zu unseren Angeboten
6/11/2004 11:14:31 PM    
Registration necessaryRegistration necessary
Pages: (1) [1] »
all Times are GMT +1:00
Thread-Info
AccessModerators
Reading: all
Writing: User
Group: general
none
Forum Overview » Programmieren » ASP » Webserverstatus über Internet überprüfen

.: Script-Time: 0.063 || SQL-Queries: 6 || Active-Users: 876 :.
Powered by ASP-FastBoard HE v0.8, hosted by cyberlord.at