if www.mysite.dk online then txtbx_status="Online" else

man kan jo altid pinge siden, men ved ikke hvor pænt det er!

eller hvad med at sende en pakke til port 80; hvis der er svar = online ellers offline

tja.. ligemeget.. siderne er begge mine.

Men den ene bruges fra min PC.
de andre har jeg hostet.

Kunne vel også lave en socketforbindelse til den... og så se om indholdet af det du får tilbage (HTML´en) er som ønsket.

dna

dna -> er det ikke det samme som mit svar? :-)

socket nej puha.. det trin er jeg slet slet ikke god nok til at arbejde med ednu.

når jeg har "leget" med sockets i .NEt er der altid gået ged i den.. lol.
og tvivler på det er bedre nu.. *gg*

men at pinge lydder cool..

brb, prøver lige at lege lidt med det.

eqvaliser -> med 'ikke så pænt' mente jeg mere overfor webserveren. Selve dine sider lider sman ikke nogen last

<%
Function teststatus(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
  teststatus = resultat
End Function

url = "http://www.mysite.dk"

If teststatus(url) = 1 Then
  response.write "<img src=""online.gif"" />"
Else
  response.write "<img src=""offline.gif"" />"
End If

%>

repsak: Ved ikke om det er det samme. At pinge og en socketforbindelse er vel ikke helt det samme. Det var jo også bare et foreslag.

dna

dna -> hehe nej, men jeg har vist heller aldrig påstået at det vat det samme (at der indgår sockets i ping er så en helt anden snak :-)

grunken> SUPER KODE!! den hjalp..

Points ??

Ja tak :-)

np