以下是我的代码,为何我抓取的网页内容,保存到文件中只有一部分呢? Dim bData() As Byte '数据变量
Dim intFile As Integer '可用文件变量
intFile = FreeFile() '将 intFile 设置为未使用的文件
'inetUp.AccessType = icHTTP
bData() = inetUp.OpenURL(strURL, icByteArray)
Open strPath & "\" & strFile For Binary Access Write As #intFile
Put #intFile, , bData()
Close #intFile
Dim intFile As Integer '可用文件变量
intFile = FreeFile() '将 intFile 设置为未使用的文件
'inetUp.AccessType = icHTTP
bData() = inetUp.OpenURL(strURL, icByteArray)
Open strPath & "\" & strFile For Binary Access Write As #intFile
Put #intFile, , bData()
Close #intFile
Dim bData() As Byte '数据变量
Dim intFile As Integer '可用文件变量
intFile = FreeFile() '将 intFile 设置为未使用的文件
'inetUp.AccessType = icHTTP
bData() = inetUp.OpenURL(strURL, icByteArray)
Open strPath & "\" & strFile For Binary Access Write As #intFile
Put #intFile, , bData()
Close #intFile我觉是Binary这个是读取字节的,与中文是字符的有关