IP-Adresse mit System.Net.Dns.Resolve(URL) bestimmen

[jimboo]

Hi, zunächst der Code:

Dim HostEntry As System.Net.IPHostEntry
Dim IPAddr As System.Net.IPAddress

Try
HostEntry = System.Net.Dns.Resolve("http://images.google.de/imghp?ie=UTF-8&oe=UTF-8&hl=de&tab=wi&q=")
For Each IPAddr In HostEntry.AddressList
MsgBox(IPAddr.ToString)
Next IPAddr

Catch ex As Exception
Console.WriteLine("Fehler: {0}", ex.Message)
End Try



Das Obere Bsp. funktioniert wunderbar wenn die URL einfach http://www.google.de lautet nicht aber bspw. http://images.google.de/imghp?ie=UTF-8&oe=UTF-8&hl=de&q=&tab=wi

Kann mir einer helfen?

 

[Harass]

Servus,

das Problem ist, dass die Funktion eine korrekte URI braucht.
Da die ganzen Dateien ja eh auf einem Server liegen und somit dieselbe IP-Adresse haben, könntest du aus "http://images.google.de/imghp?ie=UTF-8&oe=UTF-8&hl=de&tab=wi&q=" einfach "images.google.de" machen.

Oder du benutzt folgende elegantere Lösung:

System.Uri targetHostName = 
   new System.Uri("http://images.google.de/imghp?ie=UTF-8&oe=UTF-8&hl=de&tab=wi&q=");
System.Net.IPAddress[] ips = 
   new System.Net.Dns.GetHostAddresses(targetHostName.DnsSafeHost);
foreach (System.Net.IPAdress ip in ips) {
   /* do something */
}

Das Ganze noch auf VB ummünzen und du hast es geschafft.