如何将网站的内容解析或获取到字符串并拥有和输出?

时间:2012-11-23 09:58:07

标签: html parsing

这是一周寻找我的问题的可能答案,我正在制作一个程序,将获得一个网站的内容......我很难在它上面。这是我的代码..

Dim xmlstring As String = "<TBODY><TR><TD>**20121123-034**</TD><TD><I class="ball">**3**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**4**</I>&nbsp;<I class="ball">**7**</I></TD><TD>**2012-11-23 11:40**</TD></TR> </TBODY>"

Dim sr As New System.IO.StringReader(xmlstring)

Dim doc As New Xml.XmlDocument

    doc.LoadXml(xmlstring)

Dim reader As New Xml.XmlNodeReader(doc)

   While reader.Read

    Select Case reader.NodeType

       Case Xml.XmlNodeType.Element

    If reader.Name = "I" Then

    MessageBox.Show(reader.GetAttribute("ball"))

    RichTextBox2.Text = doc.InnerText

    Else

     MessageBox.Show("-__-")

    End If

    End Select
    End While

` 这部分是网站的来源

<TBODY><TR><TD>**20121123-034**</TD><TD><I class="ball">**3**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**4**</I>&nbsp;<I class="ball">**7**</I></TD><TD>**2012-11-23 11:40**</TD></TR>

粗体中的数字是我想在文本框或富文本框中输出的数字..

上面的代码正在运行,但它只适用于“DIM XMLSTRING”声明中的文本.....我希望它来自一个实时网站...

谢谢你们!

0 个答案:

没有答案