WebBrowser1 如何实现网页动态数据的读取和模拟发送。

lanlanjoe 2012-12-30 02:21:00
找到一个小例子
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.WebBrowser1.Navigate("http://www.baidu.com")

End Sub


Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
TextBox2.Text = WebBrowser1.Url.ToString
Dim Obj_StreamReader As New System.IO.StreamReader(Me.WebBrowser1.DocumentStream, System.Text.Encoding.GetEncoding("GB2312"))

RichTextBox1.Text = Obj_StreamReader.ReadToEnd()
Select Case time

Case 0

' wd为baidu中输入搜索内容的标志,注意搜索按钮触发的方法
Me.WebBrowser1.Document.All("wd").SetAttribute("value", "奥运")
Me.WebBrowser1.Document.Forms(0).InvokeMember("submit")
time += 1
End Select
End Sub
Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
'点击链接时,禁止打开新窗体。
e.Cancel = True
'此时转向自身窗体。
Me.WebBrowser1.Navigate(CType(sender, WebBrowser).StatusText)
End Sub

确实是没有问题。但是现在的网页中的数据都是动态的js出的动态数据 如何抓取?

提交按钮 是这种
<div class="bid-module " id="J-bid-module">

<div class="bid-input-ct clearfix">

<a href="javascript:;" class="bid-price-btn bid-minus"></a>

<input type="text" class="bid-price-input" id="J-bid-price-input"/>

<a href="javascript:;" class="bid-price-btn bid-plus"></a>

</div>

<div class="bid-submit" id="J-bid-submit"></div>

</div>
<div id="J-bid-module-mask" style="display: none; "></div> 带js的代码如何模拟发送?

要学习哪方面的知识,求高手指点!!
...全文
153 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
lanlanjoe 2012-12-31
  • 打赏
  • 举报
回复
有人指点下么

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧