急!求助!!取得网页内容的问题---为何只能取得部分?不能取得全部?
我在取这个网页的内容时http://gb.weather.gov.hk/wxinfo/currwx/tc_posc_0705.htm,只取得部分的,为何?
'程式需要一Inet1
Private Sub GetHtmlFile(sURL As String, sFile As String)
'sUrl入所要抓取的案,sFile入所要存的名
Dim bData() As Byte
'取消
Inet1.Cancel
'定模式
Inet1.Protocol = icHTTP
'定目的
Inet1.URL = sURL
'取回料
bData() = Inet1.OpenURL(, icByteArray)
' 料到案
Open sFile For Binary As #1
Put #1, , bData()
Close
Erase bData
End Sub

[解决办法]
应该有一定的延时　等待下载