Ex.Find name="ie" from html of google site, extract the character string from there to ">" and store it in tg.
- Dim client As WebClient = New WebClient()
-
Dim Str As string = client.DownloadString ("https://www.google.com/")
-
Dim SearchStr As String = "name=""ie"""
-
Dim p1 As Integer = 0
-
Dim p2 As Integer = 0
-
Dim ps As Integer = 0
-
Dim tg As String
-
p1 = Str.IndexOf(SearchStr, ps)
-
If p1 >= 0 Then
-
p2 = Str.IndexOf(">", p1)
-
tg = Str.Substring(p1+SearchStr.Length, p2 - (p1+SearchStr.Length))
-
End If
1
