如何用VB.NET技术实现HTML文档的解析?
- 内容介绍
- 文章标签
- 相关推荐
本文共计128个文字,预计阅读时间需要1分钟。
米粒卡哇伊添加了引用Microsoft.ms,然后在页面上使用Imports ms Function parseMyHtml(ByVal ToParse$) As String
米琪卡哇伊也添加编引用Microsoft.mshtml然后在页面上ImportsmshtmlFunctionparseMyHtml(ByValhtm米琪卡哇伊
也添加编引用Microsoft.mshtml然后在页面上Imports mshtmlFunction parseMyHtml(ByVal htmlToParse$) As String
Dim htmlDocument As IHTMLDocument2 New HTMLDocumentClass()
htmlDocument.write(htmlToParse)
htmlDocument.close()
Dim allElements As IHTMLElementCollection htmlDocument.body.all Dim allInputs As IHTMLElementCollection allElements.tags("a")
Dim element As IHTMLElement For Each element In allInputs
element.title element.innerText Next
Return htmlDocument.body.innerHTMLEnd Function如在这里找到
本文共计128个文字,预计阅读时间需要1分钟。
米粒卡哇伊添加了引用Microsoft.ms,然后在页面上使用Imports ms Function parseMyHtml(ByVal ToParse$) As String
米琪卡哇伊也添加编引用Microsoft.mshtml然后在页面上ImportsmshtmlFunctionparseMyHtml(ByValhtm米琪卡哇伊
也添加编引用Microsoft.mshtml然后在页面上Imports mshtmlFunction parseMyHtml(ByVal htmlToParse$) As String
Dim htmlDocument As IHTMLDocument2 New HTMLDocumentClass()
htmlDocument.write(htmlToParse)
htmlDocument.close()
Dim allElements As IHTMLElementCollection htmlDocument.body.all Dim allInputs As IHTMLElementCollection allElements.tags("a")
Dim element As IHTMLElement For Each element In allInputs
element.title element.innerText Next
Return htmlDocument.body.innerHTMLEnd Function如在这里找到

