Homepage ID auslesen und in String packen

PlatinSecurity · 30. Januar 2017, 12:31

Hallo zusammen,

habe das Problem, dass ich nicht den Wert aus einer Homepage in ein String packen kann.
Habe dazu einiges jetzt gesucht per Google, konnte aber nix hilfreiches finden.

Habe das hier mal versucht und es geht wie gesagt leider nicht so wie ich mir das vorgestellt habe:

VB.NET-Quellcode

Public Function Wertlesen(ByVal Gesstring As String, ByVal URL As String) As Integer
Dim hReq As HttpWebRequest
Dim HRes As HttpWebResponse
hReq = DirectCast(HttpWebRequest.Create("https://www.wieistmeineip.de/"), HttpWebRequest)
HRes = DirectCast(hReq.GetResponse(), HttpWebResponse)
Dim s As Stream = HRes.GetResponseStream()
Dim sR As New StreamReader(s)
Dim webpage As String = sR.ReadToEnd
sR.Close()
s.Close()
sR = Nothing
s = Nothing
hReq = Nothing
HRes = Nothing
Dim Startpos As Integer = webpage.IndexOf("ipv4-value")
Dim Zwischenstring As String = webpage.Substring(Startpos, 40)
Dim i As Integer = 0
Wertlesen = 0
Do Until i = 39
If IsNumeric(Zwischenstring(i)) = True Then
If IsNumeric(Zwischenstring(i + 2)) = True Then
Wertlesen = Convert.ToString(Zwischenstring(i) & Zwischenstring(i + 1) & Zwischenstring(i + 2))
Exit Do
Else
Wertlesen = Convert.ToString(Zwischenstring(i) & Zwischenstring(i + 1))
Exit Do
End If
End If
i = i + 1
Loop
End Function

(hierzu muss gesagt werden, dass ich das auch mit "Convert.ToInt32" versucht habe)

und bei Form Load habe ich einfach ein Label namens "ip" der dann den String ausgeben soll (in dem fall die eigene Internet IP-Adresse):

VB.NET-Quellcode

ip.Text = Wertlesen("ipv4-value", ip.Text)

Bei mir wird in allen möglichkeiten ob String oder Int ... IMMER ... "-4" ausgegeben.

Würde gerne wissen wie ich es schaffe, dass meine IP-Adresse (IPv4) angezeigt wird von dieser Seite ? :saint:

*Topic verschoben*

xChRoNiKx · 30. Januar 2017, 13:55

könnte daran liegen das es "ipv4-value" dort garnicht gibt.

Aber du machst es dir komplizierter als es ist

Wenn du nur deine IP möchtest:

C#-Quellcode

string ip = new WebClient().DownloadString("http://icanhazip.com");
Console.WriteLine(ip);

Ist in C# aber das sollte ja kein Problem sein also der Umbau.
Alternative wenn du nicht auf einen Fremden HOST angewiesen sein möchtest
kannst du dir einfach eine PHP Datei auf ein WebSpace legen mit dem Inhalt:

PHP-Quellcode

<?php
echo $_SERVER["REMOTE_ADDR"];
?>

Und dann anstatt icanhazip dein PHP Script abrufen

Grüße

Radinator · 30. Januar 2017, 14:02

PlatinSecurity schrieb:

Public Function Wertlesen

PlatinSecurity schrieb:

Dim hReq As HttpWebRequest

Außerdem ist das ganze sicher kein VBA sondern VB.NET

PlatinSecurity · 30. Januar 2017, 15:13

xChRoNiKx schrieb:

könnte daran liegen das es "ipv4-value" dort garnicht gibt.

#

Doch

... "<span id="ipv4-value">MEIN IPv4</span>" zu finden bei "<div class="">" unter "<div id="ipv4" class="ip">".

Radinator schrieb:

Außerdem ist das ganze sicher kein VBA sondern VB.NET

Hast du gleube recht :x Ich bitte um entschuldigung und wäre sehr dankbar wenn dies verschoben wird. :saint:

Und nun noch mal zu - xChRoNiKx -:
Ich kann dies nicht ändern da ich aktuell erst wieder heute damit angefangen hab mich zu beschäftigen.
Bin sehr lange in diesen Bereichen nicht mehr tätig gewesen.

EDIT: Ah doch ok habs ... war ja nur das DIM

EDIT2: Kann irgendwie keine Antwort mehr erstellen aber ok... dann so...
Ok mit dem Code

VB.NET-Quellcode

Dim ipv4 = New WebClient().DownloadString("http://icanhazip.com")
ip.Text = ipv4

bekomme ich aber jetzt leider nur die IPv6 raus.

Würde gerne die IPv4 Adresse haben.
Auch bei Internet Nutzern die IPv6 bevorzugt haben.
Die von wieistmeineip.de schaffen das ja auch irgendwie :x

xChRoNiKx · 30. Januar 2017, 15:20

PlatinSecurity schrieb:

Doch ... "<span id="ipv4-value">MEIN IPv4</span>" zu finden bei "<div class="">" unter "<div id="ipv4" class="ip">".

Ich kann dies nicht ändern da ich aktuell erst wieder heute damit angefangen hab mich zu beschäftigen.

Also ich hab mir jetzt wirklich mal eben die mühe gemacht und nachgeschaut.
Du hast einfach falsch geschlussfolgert.
"ipv4-value" ist nicht vorhanden.
So sieht der Quelltext aus:

HTML-Quellcode

<div id="ipv4" class="ip"> <div><h1>Ihre IP-Adresse lautet:</h1></div> <div class="title"><strong>xxxxxxxx</strong></div></div>
<div id="ipv6" class="ip"> <div>Ihre IPv6-Adresse lautet:</div> <div class=""><span id="ipv6-value">nicht vorhanden</span> <a href="https://www.wieistmeineip.de/ipv6/" class="info"></a></div></div>

Es gibt "ipv6-value" aber kein ipv4.

VB.NET-Quellcode

Dim ip As String = New System.Net.WebClient().DownloadString("http://icanhazip.com")
MessageBox.Show(ip)

Sollte gehen ist jetzt aussem Kopf raus...

@EDIT//
@PlatinSecurity :
wieistmeineip die rechnen die IPv4 von der IPv6 aus und zeigen dir deshalb beide an.
PHP gibt dir immer nur die IP zurück mit der du dich zu dem Server verbindest.
Verbindest du dich per v4 zeigt er die v4 an wenn du mit v6 ankommst bekommst du eben die v6 angezeigt.
Du kannst meines wissens nach NICHT beide Adressen bekommen da nur mit einer der beiden die verbindung aufbaust ( korrigiert mich wenn falsch bitte )
Deshalb ist Konvertieren angesagt. Da einfach nach googlen

Greetz

PlatinSecurity · 30. Januar 2017, 15:46

Also

VB.NET-Quellcode

Dim ip As String = New System.Net.WebClient().DownloadString("http://icanhazip.com")
MessageBox.Show(ip)

geht leider auch nicht wie erwartet. Zeigt ebenfalls eine IPv6 an.

Zu "wieistmeineip.de"... Komisch bei mir sieht es so aus >>

xtts02 · 30. Januar 2017, 15:58

Welchen Browser verwendest Du?
Bei mir sieht der Html-Quellcode unter IExplorer, FireFox und Chrome in jeweils aktueller Version so aus:

xChRoNiKx · 30. Januar 2017, 16:02

Der unterschied im Quellcode kommt von der Verbindung die man aufbaut.
Kommt man per v6 drauf gibt es ein v4-value Feld weil dies ausgerechnet / konvertiert wird.
Kommt man per v4 drauf ist es nicht da und meine v6 Adresse wird auch nicht angezeigt aber ein v6-value Feld.
Also bleibt dir nichts anderes übrig als zu prüfen ob du eine v6 Adresse hast wenn ja dann konvertieren. (falls es etwas anderes gibt bin ich da auch gerne offen

)

PlatinSecurity · 30. Januar 2017, 17:19

Also bleibt dir nichts anderes übrig als zu prüfen ob du eine v6 Adresse hast wenn ja dann konvertieren.

Ich habe eine IPv6. Das brauche ich gar nicht erst prüfen

Aber Convertieren von IPv6 Adressen is doch gar nicht möglich oder doch ?
Sind ja verschlüsselt eigentlich ? o.o

xChRoNiKx · 30. Januar 2017, 17:37

Verschlüsselt sind die nicht.
Es gibt mehrere Arten von diesen IP Adressen.
Es gibt welche die lassen sich hin und her Konvertieren und es gibt welche bei denen es nicht geht.

Du bekommst ja deine richtige IP zurück sei es v4 oder v6.
Wie gesagt Konvertieren geht nicht bei allen Adressen ließ dir dazu mal die Wiki Artikel für ipv6 durch.
Die Frage ist wofür brauchst du das ?

PlatinSecurity · 30. Januar 2017, 17:54

ließ dir dazu mal die Wiki Artikel für ipv6 durch

Ja hab es gerade getan.
Habe auch mit einem eigenen PHP Script das jetzt so gemacht:

PHP-Quellcode

<?php
if($_GET["check"] == "ipv6")
{
if(stristr($string, ':') === TRUE)
{
$ipv6 = $_SERVER["REMOTE_ADDR"];
$ipv4 = hexdec(substr($ipv6, 0, 2)). "." . hexdec(substr($ipv6, 2, 2)). "." . hexdec(substr($ipv6, 5, 2)). "." . hexdec(substr($ipv6, 7, 2));
echo $ipv4;
}
else
{
$ip = $_SERVER["REMOTE_ADDR"];
echo $ip;
}
}
elseif($_GET["check"] == "ipv4")
{
$ipv6 = $_SERVER["REMOTE_ADDR"];
$ipv4 = hexdec(substr($ipv6, 0, 2)). "." . hexdec(substr($ipv6, 2, 2)). "." . hexdec(substr($ipv6, 5, 2)). "." . hexdec(substr($ipv6, 7, 2));
echo $ipv4;
}
else
{
echo"
Welche IP möchtest du von dir sehen ?<br>
<hr><br>
<a href='?check=ipv4'>IPv4</a><br>
<a href='?check=ipv6'>IPv6</a><br>
<br><hr>
";
}
?>

So kann ich bei

VB.NET-Quellcode

Dim ipv4 = New System.Net.WebClient().DownloadString("http://www.SERVERNAME.ENDUNG/PFAD/?check=ipv4")
'oder halt
Dim ipv4 = New System.Net.WebClient().DownloadString("http://www.SERVERNAME.ENDUNG/PFAD/?check=ipv6")

Die werte ausgeben lassen.
Problem ist nur jetzt... Meine IPv6 lässt sich anscheind nicht Konvertieren :'D
Bei wieistmeineip.de bekomme ich eine "37.2x.xxx.xxx" IP und wenn ich das Konvertiere mit der Methode eine "42.2.xxx.x" IP ?! :'D

Wie macht das bitte wieistmeineip.de und wie macht das z.B. der TeamSpeak3 Client ?
Da kann man ja die Verbindungsinformationen auch abrufen und sieht seine IPv4 Adresse.
Bei den neueren Server Versionen wurde es ja gefixt und für IPv6 User auch diese eingefügt.

Aber es geht. Ts3 Client und wieistmeineip.de bekommen also meine echte IPv4 Adresse aber ich kann diese nicht
selber "Konvertieren" oder ausgeben ?

xChRoNiKx · 30. Januar 2017, 18:22

Ich gehe mal davon aus das du einen "vollwertigen" IPv6 Anschluss hast und ansich hast du garkeine IPv4 bekommen. (Schau mal in deinen Router nach)
Dahingegen wird das ganze per Tunnel geregelt "6to4" oder anderes gibt es auch im Wiki Artikel zu IPv6 zu lesen : de.wikipedia.org/wiki/6to4
Auf der rechten Seite sind IPv6-Übergangsmechanismen zu finden. Geh ich mal von aus das es dann nicht möglich ist diese umzurechnen wie ich ja sagte.

Du kannst das ganze auch im Router nachschauen. Bei mir gibt es diverse Einstellungen zu IPv6 die ich machen kann auch was das Tunneling angeht.
Noch tiefer was das ganze Tunneling und IPv6-Packets -> IPv4-Packets angeht kann ich nicht gehen da dort auch mein Wissen aufhört
und ich möchte ungern unwahre Sachen teilen

Aber ich denke mit dem WIKI und auch so dem Internet findet man noch paar mehr
Sachen die das ganze Betreffen

Greetz

PlatinSecurity · 30. Januar 2017, 18:36

Ja ich habe einen IPv6 Anschluss von Unitymedia.

Im Vertrag selber steht ja auch die IPv4 Adresse, aber auch im Rounter so weit ich weis unter Sicherheit oder so.
Selbst wenn nicht. WIE kann wieistmeineip.de oder der Ts3 Client meine IPv4 ermitteln die auch noch richtig ist.

Ich habe jetzt allein durch 2 verschiedene Konvertierungs Methoden 2 unterschiedliche "ipv4" Adressen die
aber falsch sind.

Erste Methode ist ja wie oben bekannt und die Zweite habe ich jetzt einfach mal so versucht:

PHP-Quellcode

$ip = $_SERVER["REMOTE_ADDR"];
list(,$ip) = unpack('N',$ip);
$ip2 = long2ip($ip);
echo $ip2;

Da kommt komischer weise ein IPv4 mit 50.9x.xx.xx

Naja aber letzendlich steht die frage... Wie machen es die beiden Beispiel Seiten/Clienten ?

xChRoNiKx · 30. Januar 2017, 18:58

So habe mal eben geschaut was da so läuft

Vergiss das umrechnen.

Habe mir mal angesehen was denn so passiert bei wieistmeineip
Dort werden per AJAX jeweils 2 PHP Scripte abgerufen
Einmal um IPv4 zu bekommen und einmal IPv6 (wenn vorhanden bei mir)
Gehe davon aus das die dort dann zu einem v4 only und einem v6 only Webserver Anfragen schicken.
So bekommen sie dann beide Adressen. Weil wie gesagt du kannst nicht mit beiden gleichzeitig zu ein und dem selben Server verbunden sein.
Teamspeak wird das wahrscheinlich genauso handhaben.

Diese Website : whatismyv6.com
Hat auch jeweils eine Subdomain für eine Adresse.
Also !denke! ich das es so geregelt wird. Anders kann ich mir nicht vorstellen.

PlatinSecurity · 30. Januar 2017, 19:07

Diese Website : whatismyv6.com
Hat auch jeweils eine Subdomain für eine Adresse.

Habe mir das mal angeschaut und das sieht echt gut aus.
Nur kann ich die jetzt nicht so einfach mit

VB.NET-Quellcode

Dim ipv4 = New System.Net.WebClient().DownloadString("http://ipv4.whatismyv6.com/")
'oder
Dim ipv6 = New System.Net.WebClient().DownloadString("http://ipv6.whatismyv6.com/")

einbinden, da sonst der HTML Text ausgegeben wird.

Kommen wir also da wieder zum "Anfang".
Ich versuch es mal mit HTML Auslesen :'D

Melde mich sobald ich mehr hab als EDIT ! ... Bis gleich :o

EDIT: Klappt nicht :DDDD
Es entsteht genauer gesagt ein Fehler im Visual Basic Programm
"Die Eingabezeichenfolge hat das falsche Format."

Trotz versuch mit "Convert.ToString" und "Convert.ToInt32"

EDIT - WICHTIG -:
Habe es geschafft. Dank der Antwort von dir @xChRoNiKx mit dem Host "icanhazip.com".
Habe einfach mal so dumm wie ich bin noch das hier dran gehangen "ipv4.icanhazip.com" und "ipv6.icanhazip.com".
Beide geben halt das aus, was sie auch sollen *-*

Fazit: ES GEEEEEHT

... Ihr dürft den Post nun schließen und ich bedanke mich bei allen dir mir geholfen haben und Geduldig waren :3

xChRoNiKx · 30. Januar 2017, 20:06

Nur noch ganz nebenbei. Auch wenn das jetzt funktioniert.

Ich fragte ja schon wofür du das denn brauchst

Wenn jemand kein IPv6 hat kommt ein Verbindungsfehler bei der IPv6 Adresse (Müsstest du also noch Abfangen)

Grüße

Radinator · 31. Januar 2017, 07:52

xChRoNiKx schrieb:

wieistmeineip die rechnen die IPv4 von der IPv6 aus und zeigen dir deshalb beide an.

Ausrechnen? Du bist lustig ;D Nein. Solche Domains lesen aus der TCP Verbindung zwischen dir und der Seite einfach deine öffentlich IP ab.

PlatinSecurity schrieb:

Ich habe eine IPv6.

Du (also dein Rechner) oder dein Anschluss?

PlatinSecurity schrieb:

Aber Convertieren von IPv6 Adressen is doch gar nicht möglich oder doch

In was willst du eine IPv6 Adresse konvertieren?

IPv6 ist ledigltich eine Darstellungsweise. IPv4 hat als Darstellungspool (also Zeichen, die zur Darstellung verwendet werden können) die (Dezimal-)Zahlen 0 bis 9 und den .. IPv6 wiederum verwendet die Hex-Ziffern 0 bis F. IPv4 hat 4 (durch den Punkt getrennte) "Stellen", die von 0 bis 255 reichen können. IPv6 hat 8 (durch : getrennte) "Stellen", welche von 0 bis FFFF reichen.

xChRoNiKx · 31. Januar 2017, 10:06

Radinator schrieb:

Ausrechnen? Du bist lustig ;D Nein. Solche Domains lesen aus der TCP Verbindung zwischen dir und der Seite einfach deine öffentlich IP ab.

Jo deshalb sagte ich ja vergiss das umrechnen, war da ein wenig auf dem falschem weg.
Hatte ja dann extra mal bei wieistmeineip.de nachgeschaut und dann rausgefunden das die einfach 2 Request abschicken
einmal für die v4 und einmal für die v6 Adresse

Homepage ID auslesen und in String packen

Homepage ID auslesen und in String packen

VB.NET-Quellcode

VB.NET-Quellcode

C#-Quellcode

PHP-Quellcode

PlatinSecurity schrieb:

PlatinSecurity schrieb:

xChRoNiKx schrieb:

Radinator schrieb:

VB.NET-Quellcode

PlatinSecurity schrieb:

HTML-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

PHP-Quellcode

VB.NET-Quellcode

PHP-Quellcode

VB.NET-Quellcode

xChRoNiKx schrieb:

PlatinSecurity schrieb:

PlatinSecurity schrieb:

Radinator schrieb:

Tags

Ähnliche Themen

4 Benutzer haben hier geschrieben