請(qǐng)問vb.net如何獲取網(wǎng)頁表格中的數(shù)據(jù)

用正則表達(dá)式吧，首先導(dǎo)入命名空間System.Text.RegularExpressions，用Webbrowser載入頁面，使用vb.net的代碼如下：

成都創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：成都做網(wǎng)站、網(wǎng)站設(shè)計(jì)、外貿(mào)營銷網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時(shí)代的靜海網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

Dim iTable As String = WebBrowser1.Document.Body.InnerHtml

Dim str_xm1 As String = Regex.Match(Regex.Matches(iTable, "td.*?/td").Item(6).Value, ".*?").Value

這樣str_xm1就是你要的內(nèi)容。

VB.NET 獲取網(wǎng)頁 表格

html

head

titleTest/title

script?language="VBScript"?type="text/vbscript"

!--??????'按鈕事件

sub?Test1_onClick()

msgbox?document.getelementsbytagname("table")(0).innerText

end?sub

sub?Test2_onClick()?'提取每單元文本

dim?Text

'獲取表格中的行集

set?trs=document.getelementsbytagname("table")(0).getelementsbytagname("tr")

for?each?tr?in?trs??'遍歷每行

for?each?td?in?tr.getelementsbytagname("td")?'遍歷每行中的每單元

text?=?text??td.innerText??vbtab??'每單元用制表符分隔

next

text?=text??vbcrlf??'換行

next

msgbox?text

end?sub

--

/script

/head

body

table?cellspacing="0"?cellpadding="0"?class="list1"

tbody

tr?class="listtou"

td?width="10%"日期/td

td?width="10%"姓名/td

td?width="10%"備注/td

/tr

/tbody

tr

td?width="10%"2014-01-15?10:40:52/td

td?width="10%"張山/td

td?width="10%"32/td

/tr

tr

td?width="10%"2014-01-16?10:40:52/td

td?width="10%"李四/td

td?width="10%"29/td

/tr

/table

div

input?type="button"?name="Test1"?value="測(cè)試1"?

input?type="button"?name="Test2"?value=?"測(cè)試2"

/div

/body

/html

'主要是對(duì)htmlDocument對(duì)像的操作，我發(fā)現(xiàn)htmlDocument對(duì)象可以通過body.InnerHtml載入html文本也能解析，這樣比webBrowser1方便，因?yàn)槭峭降摹?/p>

'你試試用webClient的downloadString下載網(wǎng)頁文本，然后賦給htmlDocument對(duì)象下的body.InnerHtml。

'上面只是代碼例子，只供參考。用ie打開，某些瀏覽器可能不支持。

vb.net怎么使用表格控件？

DataGridView控件，放一個(gè)DataGridView1和Button1到窗體，下面是按鈕下代碼\x0d\x0a Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click\x0d\x0a Me.DataGridView1.AllowUserToAddRows = False\x0d\x0a DataGridView1.RowTemplate.Height = 200\x0d\x0a DataGridView1.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.None\x0d\x0a For i = 1 To 3\x0d\x0a Me.DataGridView1.Columns.Add("列" i.ToString, "列" i.ToString)\x0d\x0a Me.DataGridView1.Rows.Add()\x0d\x0a Next\x0d\x0a Me.DataGridView1.Columns(0).Width = 100\x0d\x0a Me.DataGridView1.Columns(1).Width = 500\x0d\x0a Me.DataGridView1.Columns(0).Width = 300\x0d\x0a End Sub\x0d\x0a'自己設(shè)置相關(guān)需要的屬性即可

如何 使用vb.net獲取網(wǎng)頁表單中的數(shù)據(jù)

接受頁面： 用Request.QueryString["canshu"].toString（）； 這樣就接受到textbox里的值了。 然后根據(jù)這個(gè)值到數(shù)據(jù)庫里查詢就行了。