VB如何正确获取网页返回的HTTP头中的Status

Question

我往窗体里拉了一个INET，输入如下代码：Inet1.OpenURL 地址
Debug.Print Inet1.GetHeader结果返回的结果是
HTTP/1.1 200 OK
Date: Fri, 04 Feb 2011 09:39:38 GMT
Server: Microsoft-IIS/6.0
Content-Length: 67044
Content-Type: text/html; Charset=UTF-8
Cache-control: private很明显，这里返回了200状态码。
但是，我设置的地址返回的应该是301状态码！
难道VB获取的是301后的网址么？
我用XMLHTTP1.Status，结果也是200.

Answer 1

在其他网站测试我设置的地址，返回的就是301。