Kode der kan sende en videre hvis side/server er nede

hehe, kan se du ordentligt bliver sendt rundt i kategorierne :o)

men dette er nok et af de problemer man ikke lige løser med javascript :o), men jeg har vist et hjemmelavet aspscript liggende :o)

og eftersom jeg kan se, så er det da osse asp du i forvejen har gang i :o)

Det ville være dejligt.
Har prøvet et ASP med det virkede ikke :(

prøv den her :

<%
Function testHTTP (url)
dim objXMLHTTP, resultat, html

Set objXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
objXMLHTTP.Open "GET", URL, false 
  On Error Resume Next
  objXMLHTTP.Send

  If Not err.number <> 0 Then
    resultat = 1
  Else
    resultat = 0
  End If

  Set objXMLHTTP = Nothing
  testHTTP = resultat
End Function


If testHTTP(request.querystring("http")) = 1 Then
  response.redirect request.querystring("http")
Else
  response.redirect "http://www.newz.dk"
End If
%>

gem ovenstående i en fil, eks:
checkside.asp

kald den vha. et link fra en anden side som følger:
<a href="checkside.asp?http=http://www.eksperten.dk">Test</a>

Sidste ting der kan anbefales er at du lige anmelder dit eget spørgsmål, og så vil en co'admin rykke det over i aspkategorien :)

Det gør jeg lige.

Kan man også få den til at checke om en side kan hentes eller er det kun om serveren er oppe der checkes?

eftersom at eks. eksperten automatisk videresender fejlsider til forsiden, vil ovenstående ikke kunne checke på undersider!

men hvis siden, ikke har de der automatiske videresendelser af fejlfiler, så vil det fungere rigtigt osse med undersider....!

men ellers ikke :o)

Nej det er så rigtigt :)

Men http://www.ht.dk/virkerikke.htm giver ingen fejl f.eks.

ARhh på den måde. Tror jeg er med så langt.

Men kan man få den til at checke om en side kan vises/loades?

Har undersøgt lidt nærmere og det kan man vel gøre ved at bruge denne funktion:
objXMLHTTP.ResponseBody som måler hvor stor siden der henvises til er.

Poster lige koden når jeg er færdig med den.
Mange tak for hjælpen grunken.

Hov grunken laver du lige et svar så du kan få point?

Dette virker 100%

<%
'''URL PÅ DET BILLEDE DER SKAL KALDES
PicUrl="https://www.gatetradenet.dk/dgh/pic/mainLogo.jpg"


'''Str. I BYTES PÅ BILLEDET DER KALDES
PicSize=10269


Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objXMLHTTP.Open "GET", PicUrl, False

On Error Resume Next
objXMLHTTP.Send
bytLength = LenB(objXMLHTTP.ResponseBody)
Set objXMLHTTP = Nothing


'''VISER OG FINDER STATUS
IF NOT err.number<>0 THEN
  IF bytLength=PicSize THEN
    Response.Write "Status: Siden er oppe"
  ELSE
    Response.Write "Status: Siden er nede"
  END IF
ELSE
  Response.Write "Status: Domæne findes ikke"
END IF
%>

kanon :)

Jeg var lige optaget andetsteds :), men det ser jo så ud til at virke til dit behov :)