'use httputils2 module (source code version which support non-ui, not *.jar lib
Dim linkstr As String = "http://yourtarget.com"
Dim j As HttpJob
j.Initialize("j", Me)
j.Download(linkstr)
Sub JobDone(j As HttpJob)
If j.Success Then
html_STR = j.GetString
html_STR.substring2(point1,point2)
Else
html_STR=""
End If
End Sub