MSHTML: CreateDocumentFromString anstelle von CreateDocumentFromUrl

Question

Ich möchte die MSHTML-Bibliothek verwenden, um einige HTML zu analysieren, die ich in einer Zeichenfolge-Variable habe. Ich kann jedoch nicht herausfinden, wie das geht. Ich kann den Inhalt einer Webseite mit einer bekannten URL, aber nicht direkt mit der Quell-HTML direkt analysieren. Ist das möglich? Wenn das so ist, wie?

Public Sub ParseHTML(sHTML As String) 
Dim oHTML As New HTMLDocument, oDoc As HTMLDocument 

    'This works:' 
    Set oDoc = oHTML.createDocumentFromUrl("http://www.google.com", "") 

    'I would like to do the following but no such method actually exists:' 
    Set oDoc = oHTML.createDocumentFromString(sHTML) 

    .... 
    'Parse the HTML using the oDoc variable' 
    .... 

Answer 1

Sie können;

Dim odoc As Object 

Set odoc = CreateObject("htmlfile") '// late binding 

'// or: 
'// Set odoc = New HTMLDocument 
'// for early binding 

odoc.open 
odoc.write "<p> In his house at R'lyeh, dead <b>Cthulhu</b> waits dreaming</p>" 
odoc.Close 
MsgBox odoc.body.outerHTML 

Answer 2

Dies ist ein viel besseres Beispiel. Sie erhalten weder eine Null-Ausnahme noch eine späte Bindung.

(Und wenn Sie WPF verwenden, fügen Sie einfach System.Windows.Forms in Ihre Referenz.)

Dim a As Object 
     a = New mshtml.HTMLDocument 

     a.open() 
     a.writeln(code) 
     a.close() 

     Do Until a.readyState = "complete" 
      System.Windows.Forms.Application.DoEvents() 
     Loop 


     Dim doc As mshtml.HTMLDocument = a 



     Dim b As mshtml.HTMLSelectElement = doc.getElementsByTagName("Select").item("lang", 0) 

Answer 3

Für gerade HTML-Code wie Access-Rich-Text-dies tut es:

Dim HTMLDoc As New HTMLDocument 

HTMLDoc.Body.innerHTML = strHTMLText