我按论坛上的代码 可以实现读取网页数据 现在有一个问题,网页每次要手动刷新才能读取最新数据,请教大家一下,怎么在这代码中 加一个刷新的代码 类型IE的 F5 刷新
Dim web As New System.Windows.Forms.WebBrowser()
web.ScriptErrorsSuppressed = True
web.Navigate("http://lot.mayaba8.com/home/History?lotteryId=12")
Do Until web.ReadyState = 4
Application.DoEvents
Loop
Dim tb As object = web.Document.GetElementsByTagName("table")(0)
Dim trs = tb.GetElementsByTagName("tr")
For i As Integer = 1 To trs.count-1 Step 3
Dim tds As object = trs(i).GetElementsByTagName("td")
For j As Integer = 0 To tds.count-1 ' Step 3
Output .show(i & "行" & j & "列:" & tds(j).innerText )
' MessageBox.Show( i & "行" )
If j = 0
MessageBox.Show(i & "行" & j & "列:" & tds(j).innerText )
End If
Next
Next