Anyone know why this only returns half of the html source code?Code:Richtextbox1.text = Inet1.OpenURL("http://forums.vb-world.net")
Printable View
Anyone know why this only returns half of the html source code?Code:Richtextbox1.text = Inet1.OpenURL("http://forums.vb-world.net")
I think you need to do a loop to retrieve all the data:
Code:Dim ReturnStr As String
RichTextBox1.Text = Inet1.OpenURL("http://forums.vb-world.net", icString)
ReturnStr = Inet1.GetChunk(2048, icString)
Do While Len(ReturnStr) <> 0
DoEvents
RichTextBox1.Text = RichTextBox1.Text & ReturnStr
ReturnStr = Inet1.GetChunk(2048, icString)
Loop
Read the source it returns for clues. Once I was returning a page that had a REDIRECTION in the following format:
<META HTTP-EQUIV="REFRESH" CONTENT=
Or it could be the GetChunk crap. I prefer Java for this sort of thing.