2016-05-31 2 views
-1

Ich habe ein kleines Problem mit dem Versuch, eine Zeichenfolge von einem Element auf einer Website zu erhalten.VB.Net - Getting eine Zeichenfolge/Wert eines Elements HTML?

Was ich bin mit dem Ziel für: Grundsätzlich versuche ich, einen String/Wert von einer Website zu bekommen und es in eine TextBox.text gehen oder sogar beschriften. Es gibt nicht viel Exmaples, aber ich bin nicht in diesem Bereich erfahren, gut darin, Elemente von den Websites zu erhalten/zu greifen und die Werte in Kästen oder lables zurückzugeben!

Aber das ist was ich bisher habe.

Imports System.Net 
Imports System.Collections.Specialized 

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click 

    On Error Resume Next 
    'Web String 
    Dim ws As New WebClient 
    Dim data As String = ws.DownloadString("http://www.ip-tracker.org/locator/ip-lookup.php?ip=" & TextBox1.Text) 

    'IP 
    Dim IP As String = Split(data, "<th>IP Address:</th>")(1) 

    IP = Split(IP, "<div style=")(0) 
    'If IP = Nothing Then 
    'IP = "Unknown" 
    'End If 
    IPLabel.Text = (IP) 

End Sub 

Wenn mir jemand helfen kann, das wäre toll!

Vielen Dank im Advanced, wenn mir jemand,

helfen

Sirmajor

+0

Seitennotiz: Sie haben einige VB6-Syntax in dem obigen Code. Erhalten Sie '.net und vb6 'verwirrt? – Codexer

+0

Verwenden Sie einen HTML-Parser. –

+0

@zaggler: Dies ist VB.NET. Er verwendet einige VB6-Methoden und die 'On Error Resume Next'-Anweisung, aber das ist VB.NET aufgrund der Konstruktion des Button-Ereignisses. Die Button-Events von VB6 sehen so aus: 'Sub Command1_Click()'. --- ** EDIT: ** Mein schlechtes. Ich habe nachgeschlagen, und ich habe VB6 benutzt, aber meine Button-Ereignisse sahen nicht wie VB.NET aus, sondern wie ich oben geschrieben habe. Seltsam ... –

Antwort

1

HTML-Seite ist die gleiche wie xml, so dass Sie Zeichenfolge XDocument Objekt und Abfrage analysieren können, die benötigten Informationen zu finden Objekt.

Oben ist das Beispiel, wie Sie bestimmte Knoten aus XML-Dokument finden können. Verwenden Sie denselben Ansatz, um den benötigten Wert zu finden.

+0

Fehler erhalten, diese Zeile: Dim URL Als String = $ "http://www.ip-tracker.org/locator/ip-lookup.php?ip={TextBox1.Text}" –

+0

+1 Liebe mir etwas String-Interpolation! Ich benutze $ "" die ganze Zeit jetzt. Ich weiß, dass Sie den Post bearbeitet haben, aber ich würde beide Möglichkeiten in der Antwort angeben. –

+0

Immer noch nicht verstehen = /, Sie kümmern sich um den Code zu reparieren, so dass es diese bestimmte Zeile oder Zeichenfolge von der Website lesen kann? Ich versuche, die Rückgabewerte der Mehrheit der Zeichenfolge dieser Website zu erhalten, wenn es die Details der IP findet. http://www.ip-tracker.org/ –

Verwandte Themen