.net html agilitypack从表中获取数据
我想做的是从这个表中获取数据:.net html agilitypack从表中获取数据,.net,vb.net,html-agility-pack,.net,Vb.net,Html Agility Pack,我想做的是从这个表中获取数据: <div class="fliptable"> <div class="head"> <div class="outer"> <div class="inner"> Information</div> </div> </div> <table class="body"> <tbody>
<div class="fliptable">
<div class="head">
<div class="outer">
<div class="inner">
Information</div>
</div>
</div>
<table class="body">
<tbody>
<tr>
<td class="key" style="">
SKU
</td>
<td class="right">
SKU1<br>
SKU2<br>
SKU3<br>
</td>
</tr>
<tr>
<td class="key" style="">
EAN
</td>
<td class="right" style="">
EAN1<br>
EAN2<br>
EAN3<br>
</td>
</tr>
</tbody>
</table>
我得到的结果是:
SKU
SKU1
SKU2
SKU3
EAN1
EAN2
EAN3
我想要的是:
SKU
SKU1
SKU2
SKU3
EAN
EAN1
EAN2
EAN3
但我无法让它在我的生命中发挥作用这是有效的:
Dim bodyTable = (From tbl In doc.DocumentNode.Descendants("table")
Where tbl.Attributes.Contains("class") AndAlso tbl.Attributes("class").Value = "body").FirstOrDefault
If bodyTable IsNot Nothing Then
Dim allTd = bodyTable.SelectNodes("//td")
For Each td In allTd
For Each token In td.InnerText.Split(New String() {}, StringSplitOptions.RemoveEmptyEntries)
RichTextBox1.AppendText(token.Trim & Environment.NewLine)
Next
Next
End If
Dim bodyTable = (From tbl In doc.DocumentNode.Descendants("table")
Where tbl.Attributes.Contains("class") AndAlso tbl.Attributes("class").Value = "body").FirstOrDefault
If bodyTable IsNot Nothing Then
Dim allTd = bodyTable.SelectNodes("//td")
For Each td In allTd
For Each token In td.InnerText.Split(New String() {}, StringSplitOptions.RemoveEmptyEntries)
RichTextBox1.AppendText(token.Trim & Environment.NewLine)
Next
Next
End If