VB.net html 요소에서 텍스트/문자열 가져 오기

Question

요소를 가져 와서 문자열을 반환하는 데 큰 어려움을 겪고 있습니다. 나는 문자열을 얻기 위해 노력하는 몇 가지 예를 가지고 있지만 열심히 실패하지는 않습니다.

HTML Phrasing이 어렵 기 때문에 도움을 받으실 수 있습니다. 내가을 필요의

Explantion : http://www.ip-tracker.org/

내가 거의 모든 세부하지만 레이블 또는 텍스트로를 필요 IP를 입력 할 때이 사이트 떨어져 다른 요소의 strinsg을 얻을 필요가

상자. 그래서 여기 http://ip-api.com/xml/8.8.8.8

XML의 말씨와

또는 이것은 내가 지금까지 사용한 적이 있지만, 지금까지 함께있어되지 않은 exmaple입니다.

Exmaple 1 :

Dim client As New WebClient 
Dim ip As String 
Dim city As String 
Dim Region As String 

Private Function GetIp() 
    Try 
     Dim Page As String = client.DownloadString("http://www.ip-tracker.org/locator/ip-lookup.php?ip=82.16.38.43/") 
     ip = Page.Substring(Page.IndexOf("IP Address:") + 80) 
     ip = ip.Substring(0, city.IndexOf(" </td") + 30) 
     TextBox2.Text = ("IP Address: " + ip) 
    Catch ex As Exception 
     city = "Unable to lookup" 
    End Try 
    Return 0 
End Function 

이를 호출하려면 :

getViews() 

Answer 1

해보십시오 XML을 LINQ

Imports System.Xml 
Imports System.Xml.Linq 
Module Module1 
    Dim url As String = "http://ip-api.com/xml/8.8.8.8" 
    Sub Main() 
     Dim query As XElement = XElement.Load(url) 
     Dim status As String = query.Element("status").Value 
     Dim country As String = query.Element("country").Value 
     Dim region As String = query.Element("region").Value 
     Dim regionName As String = query.Element("region").Value 
     Dim city As String = query.Element("city").Value 
     Dim zip As String = query.Element("zip").Value 
     Dim lat As Double = query.Element("lat").Value 
     Dim lon As Double = query.Element("lon").Value 
     Dim timezone As String = query.Element("timezone").Value 
     Dim isp As String = query.Element("isp").Value 
     Dim org As String = query.Element("org").Value 
     Dim _as As String = query.Element("as").Value 
     Dim subQuery As String = query.Element("query").Value 

    End Sub 

End Module