Any ideas how I detect when a web page has been downloaded complete using "Inet".
Printable View
Any ideas how I detect when a web page has been downloaded complete using "Inet".
I found this code from http://www.vbcode.co.uk
If you use the GetChunk it could help you.
Title: Make sure the Inet control has all its data
When you issue the GetChunk command for the Inet control, don't
forget to wait until it's done before continuing with code that
manipulates the return values. Depending on the user's connection
speed, the GetChunk method may take several seconds. To give the
method a chance to complete before executing the rest of the code,
use the DoEvents keyword, like so:
Private Function GetData()
Dim vData As Variant
Dim strTemp As String
Do
vData = Inet1.GetChunk(256, icString)
DoEvents
If Len(vData) Then
strTemp = strTemp & vData
lblBytesReceived.Caption = CStr(Len(strTemp))
End If
Loop While Len(vData)
GetData = strTemp
End Function