how to display an IP via PhP page.

[JoeBiden]

This is the simple way of checking your IP via a PhP webpage.

Using wc As New Net.WebClient()
            Dim url As String = "http://www.whatsmyip.us/showip.php"
            Dim src As String = wc.DownloadString(url)
            Dim myPublicIP As String = "Can't get it :("
            Dim pattern As String = "\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}"
            Dim myIP As System.Text.RegularExpressions.Match = System.Text.RegularExpressions.Regex.Match(src, pattern)
            If myIP IsNot Nothing Then
                myPublicIP = myIP.Value
            End If
            MessageBox.Show(myPublicIP)
        End Using

Enjoy

[maclone]

Dim _eWebClient As New System.Net.WebClient
Dim IPResult
IPResult = System.Text.Encoding.ASCII.GetString((_eWebClient.DownloadData("http://whatismyip.com/automation/n09230945.asp")))
MsgBox(IPResult)

[JoeBiden]

Same thing same code, diferent way of putting it..?

[Apoc]

Not quite. His doesn't involve regex.

Also, use webClient.DownloadString, not DownloadData.

[maclone]

Not quite. His doesn't involve regex.
Also, use webClient.DownloadString, not DownloadData.

I can't use DownloadString, it gives me an error. I can't paste it cause it's in german.
It's something with "string" can't be converted to "1-dimensional array of byte".

Meh, cba to fix, it just works and all good.

[j00nas]

I can't use DownloadString, it gives me an error. I can't paste it cause it's in german.
It's something with "string" can't be converted to "1-dimensional array of byte".

Meh, cba to fix, it just works and all good.

        Dim _eWebClient As New System.Net.WebClient
        Dim IPResult
        IPResult = _eWebClient.DownloadString("http://whatismyip.com/automation/n09230945.asp")
        MsgBox(IPResult)

This seems to be working aswell.