代码如下,webbrowser1已经登陆到网页中,所有cookie 是正确的。
但返回的数据doc仍然是http://www.pceggs.com/play/pg28.aspx这个页面,而不是GlobalURL 这个页面。
通过WPE截包分析,xmlhttp确实下载了GlobalURL 的页面,但马上又下载了http://www.pceggs.com/play/pg28.aspx,最后返回的responseText得到的只是http://www.pceggs.com/play/pg28.aspx这个页面。
为什么?
GlobalURL = "http://www.pceggs.com/play/pg28Insert.aspx?LID=" + id
Set xmlobject = CreateObject("Microsoft.XMLHTTP")
xmlobject.open "GET", GlobalURL, False
xmlobject.setRequestHeader "Referer", "http://www.pceggs.com/play/pg28.aspx"
xmlobject.setRequestHeader "Cookie", WebBrowser1.Document.cookie
xmlobject.send
While xmlobject.ReadyState <> 4
DoEvents
Wend
If xmlobject.ReadyState = 4 Then
Set doc = xmlobject.responseTEXT
End If
但返回的数据doc仍然是http://www.pceggs.com/play/pg28.aspx这个页面,而不是GlobalURL 这个页面。
通过WPE截包分析,xmlhttp确实下载了GlobalURL 的页面,但马上又下载了http://www.pceggs.com/play/pg28.aspx,最后返回的responseText得到的只是http://www.pceggs.com/play/pg28.aspx这个页面。
为什么?
GlobalURL = "http://www.pceggs.com/play/pg28Insert.aspx?LID=" + id
Set xmlobject = CreateObject("Microsoft.XMLHTTP")
xmlobject.open "GET", GlobalURL, False
xmlobject.setRequestHeader "Referer", "http://www.pceggs.com/play/pg28.aspx"
xmlobject.setRequestHeader "Cookie", WebBrowser1.Document.cookie
xmlobject.send
While xmlobject.ReadyState <> 4
DoEvents
Wend
If xmlobject.ReadyState = 4 Then
Set doc = xmlobject.responseTEXT
End If
解决方案 »
- 如何取得当前焦点控件数组的最大下标
- 哪位高手能将我这段vc代码转换为vb或者DELPHI的,感谢感谢!
- FTP传输和拨号发送有何区别?
- 怎样才能实现PICTURE上字幕的波浪显示!!!急!
- 关于活动窗口的问题,请高手指点
- 我在使用WebBrowser控件时,他总是出现水平,垂直滚动条。如何禁止他。
- 总看到有朋友问哪种报表好用,在此发表一已拙见。
- 如何用mcisendstring(api)创建一个wave文件
- 如何让setupbuider做出的安装程序,不能反安装????????
- 为什么在一个窗体上无法放置十几个ActiveX控件
- 求段小代碼-VB
- 为何Internet transfer control部件添加后不能用?
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) http://feiyun0112.cnblogs.com/