# inet1.openurl 只能收小于64k的file???????.

Posted by david on June 24, 1999 at 09:29:53:

请问各位vb高手:
我用vb的 INET 物件去GET FILE,但每次接收到64K
便结束接收,不知道那出了问题,烦请帮帮忙.

Dim b() As Byte
Dim strURL As String
' Set the strURL to a valid address.
strURL = "http://www.xxx.xxx.xxx/xxx.exe"
b() = inet1.OpenURL(strURL, icByteArray)

Open "C:\China.jpg" For Binary Access _
Write As #1
Put #1, , b()
Close #1

如此程序结束后,file length = 64k,但xxx.exe > 64k
ps:"http://www.xxx.xxx.xxx/xxx.exe" 是一个有效的
档案位置
tks.

Follow Ups: