我使用 webBrowser 打开网页,同时需要 得到 web服务器 传回来的 head 信息,
使用 webBrowser 控件的时候,能够得到这个信息吗?顺便给大家 拜个年!!

解决方案 »

  1.   

    用Inet控件
    摘自:online的blog
    添加部件Microsoft Internet Transfer ControlsOption Explicit
    '这段代码使用了GetHeader来返回页面信息,比较准确一些
    '可以得到文件最后修改日期,文件大小等等
    '用这个办法还可以判断一个文件是否存在Private Sub Command1_Click()
    Dim a As String
    Dim str As String
    Dim RetCode As LongInet1.OpenURL "http://localhost/xml/tt.htm"If Inet1.StillExecuting Then
           DoEvents
    End If
    '可以看到所有的项目
    MsgBox Inet1.GetHeader
      

  2.   

    可是我  同时还 需要用户看到打开的网页,而不是 html 标签。
    用inet 可够得到服务器 传回的完整的 信息,但是 无法将 document 的内容 解释以后 显示给用户看啊。实际上 我的需要如下:
    一、用户通过 webbrowser 填写网页表单,如登陆框(因为网页表单的形式 不会固定,所以最好是用 webBrowser 来打开网页,让用户自己来填)。
    二、用户在 webBrowser 里面提交以后, 我抓到 web 服务器传回来的数据,从head 找到 cookie 信息, 这时 再用 inet ( 事实上我是用 winsocket) 连接web服务器, 服务器就会认为 我的软件是合法登陆的用户了。可是 第一步必须 用户自己在webBrowser 里输入 帐号、密码。  但我怎么 才能 使用webBrowser 又能够获得 服务器传回来的 head 呢?
      

  3.   

    to 兔子:
    location 是什么意思?
    location 因该只是当前窗口的url 吧
    能说明白一点吗?
      

  4.   

    可以用window.location得到一些,还有document也可以读取cookie,这些用webbrowser都是可以完成的,但是是不是所有的http头都可以得到,我是不知道的
      

  5.   

    location可以得到父页面的地址,ip我不知道用什么方式去得到了:(
      

  6.   

    只要能得到 COOLKIE 就能解决我目前的问题了,
    但是 我用下面的办法 得到的,并不包括 任何 head 信息:Set ob = web.Document
    For Each a In ob.All
        html = html & a.innerHTML
    Nextout.Text = html
    能再说具体一点吗?
      

  7.   

    http://msdn.microsoft.com/library/default.asp?url=/workshop/author/dhtml/reference/properties/cookie.aspdocument.cookiehttp://msdn.microsoft.com/library/default.asp?url=/workshop/author/dhtml/reference/objects/obj_location.asp
      

  8.   

    实际上 我的需要如下:
    一、用户通过 webbrowser 填写网页表单,如登陆框(因为网页表单的形式 不会固定,所以最好是用 webBrowser 来打开网页,让用户自己来填)。
    二、用户在 webBrowser 里面提交以后, 我抓到 web 服务器传回来的数据,从head 找到 cookie 信息, 这时 再用 inet ( 事实上我是用 winsocket) 连接web服务器, 服务器就会认为 我的软件是合法登陆的用户了。没发现你的问题,我都是在瞎答,这个很好做的,你分两步走就OK了用webbrowser先填了,如果你知道返回的地址的话,可以用用webbrowser的东西去触发inet控件就ok了,document对象我说的方法都不好
      

  9.   

    谢谢 liuxiaoyi666(兔子) 
    交个朋友吧 :>