Jag har en liten sida om ni behöver hätma extern ip-adress till er dator. Den rapporterar vilken ip-adress du har utanför brandväggen.

http://www.pellesoft.se/services/myip.aspx

Koden jag brukar använda för detta är:
<code>

Shared Function GetIPAddress() As String

' hämtar bara den interna adressen om man sitter i ett nät
' vilket gör att vi måste ta reda på den yttre adressen för att kunna rapportera
' rätt ip-adress

Dim myHttpWebRequest1 As HttpWebRequest = CType(WebRequest.Create("http://www.pellesoft.se/services/myip.aspx"), HttpWebRequest)
myHttpWebRequest1.KeepAlive = False
' Assign the response object of 'HttpWebRequest' to a 'HttpWebResponse' variable.

Dim myHttpWebResponse1 As HttpWebResponse = CType(myHttpWebRequest1.GetResponse(), HttpWebResponse)

Dim streamResponse As System.IO.Stream = myHttpWebResponse1.GetResponseStream()
Dim streamRead As New System.IO.StreamReader(streamResponse)
Dim readBuff(256) As [Char]
Dim count As Integer = streamRead.Read(readBuff, 0, 256)

Dim ipadress As String = ControlChars.Cr
' Console.WriteLine("Html-sidans innehåll är......." + ControlChars.Cr)
While count > 0
Dim outputData As New [String](readBuff, 0, count)
ipadress = outputData
Exit While
' Console.Write(outputData)
' count = streamRead.Read(readBuff, 0, 256)
End While
' Close the Stream object.
streamResponse.Close()
streamRead.Close()
' Release the resources held by response object.
myHttpWebResponse1.Close()

Return ipadress

End Function
</code>

Har du nytta av detta så är det bara att använda

Varför gjorde du den inte som en webservice? "snyggare" att hämta resultatet då, åtminstone i .NET :)

/Johan

Jag skulle vilja följa projektet, kanske under en egen tråd Pelle?