---
title: "Pinga mot IP"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/41537-pinga-mot-ip"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mini"
published: "2002-04-13T20:46:44.000Z"
updated: "2002-04-14T11:03:09.000Z"
replies: 2
views: 374
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/41537-pinga-mot-ip"
---

# Pinga mot IP

## #1 — Mini, 2002-04-13T20:46Z

Om man vill pinga mot ett ip och se om det offline eller online, hur skriver man då???

Permalänk: https://www.webforum.nu/p/41537

## #2 — mozilla, 2002-04-13T22:08Z

hmm är inte säker men tror detta varit uppe tidigare, tror inte det... utan plugin, men sök och du svar skall finna!  :e

Permalänk: https://www.webforum.nu/p/645606

## #3 — Bengan, 2002-04-14T11:03Z

Sitter du med en nyare win2000 server så är chansen stor att du kan använda ServerXMLHTTP.

Kan tex se ut så här:

```
Function GetHTML(strPage)
Dim strXMLout
On Error Resume Next 
Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
	'Winsock Timeouts: resolve, connect, send, receive
	objHTTP.setTimeouts 3000, 3000, 5000, 5000
	objHTTP.Open "GET", strPage, False
	objHTTP.Send

	If Err.Number = 0 AND objHTTP.Status = 200 Then
		strXMLout = "UPPE
	Else
		strXMLout = "NERE"
	End If

Set objHTTP = Nothing 
GetHTML = strXMLout
End Function
```

 
Sen testar du att connecta mot en sida på servern du vill kolla med: 

```
<%=GetHTML("http://www.doman.com/sida.htm")%>
```

  Då bör funktionen returnera UPPE eller NERE.

Finns inte Msxml2.ServerXMLHTTP så prova med den äldre XMLHTTP istället.

Förresten... Det kan nog hända att funktionen i vissa fall inte returnerar något alls beroende på var timeot inträffar(.setTimeouts ställer in timeoutvärdena direkt i winsock)  så lägg in en if-else sats som endast kollar efter "UPPE" vid utskrift. 

```
If GetHTML("http://www.doman.com/sida.htm") = "UPPE" Then
Response.Write "Sidan är uppe!" 
Else 
Response.Write "Sidan är nere!" 
End If
```

Förresten #2: För att kolla om komponenten finns så kommentera bort On Error Resume Next ;) Men annars bör den finnas där för hanteringen av timeouts.

Permalänk: https://www.webforum.nu/p/645742

---

Tråden på webben: https://www.webforum.nu/amne/asp/41537-pinga-mot-ip