VB 调用Inet控件下载出错 - VB / 网络编程
各位高手，小弟最近碰到一个问题：原先写的程序大概的思路是：首先webbrowser打开网址，网址显示后，点击网址上的某一个连接，当webbrowser检测到网址已经连接到想要的地址时候就开始下载文件，当用IE6的时候下载是正常的，Content-Type是正确的,是Image/jpeg;但是一旦系统的IE版本是7或者8的时候，下载就会出错，Content-Type就会出错，会全部变成Html,全部是网页格式的，下载出错！
真不知道这是什么问题，高手给指导一下！谢谢！！！
怎么没有人回呢？
'State = 12 时，用 GetChunk 方法检索服务器的响应。
Dim RetCode As Long
Dim vtData() As Byte
Select Case State
'...没有列举其它情况。
Case icError '11
'出现错误时，返回 ResponseCode 和 ResponseInfo。
vtData = inet1.ResponseCode & ":" & inet1.ResponseInfo
Case icResponseCompleted ' 12
Dim bDone As Boolean: bDone = False
'取得第一个块。
vtData() = inet1.GetChunk(1024, 1)
DoEvents
Open SavePathTemp For Binary Access Write As #1 '设置保存路径文件后开始保存
If Len(inet1.GetHeader("Content-Length")) > 0 Then ProDown.Max = CLng(inet1.GetHeader("Content-Length"))
'循环分块下载
Do While Not bDone
Put #1, Loc(1) + 1, vtData()
vtData() = inet1.GetChun
相关问答：
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
