Lesen Sie den HTML-Code einer Web-Seite mit MSHTML und VB6

Das Objekt MSHTML ermöglicht Visual Basic 6 zu einer Reihe von Operationen im Zusammenhang mit dem Internet und Web-Seiten laufen.

Wir sehen in diesem Artikel, wie man es durch ein VB6 Form sorgfältig konstruierten tun, um den HTML-Code einer Remote-Web-Seite zu lesen

Wir öffnen unsere Kopie von Visual Basic 6 und eine neue EXE-Datei. Wir erstellen ein Formular und disegnamolo wie im Bild unten, die der letzte Artikel in Frage stellt:

Die wichtigsten Elemente, deren Eigenschaften direkt aus der IDE von VB6 verwaltet werden, das Textfeld, das textarea und Knopf steuert.

Das Textfeld wird aufgerufen txtUrl als Text und weisen Sie die Standardeinstellung "http://".

Die textarea genannt wird txtCodiceHTML werden, löschen Sie den Text, werden wir die Multiline-Eigenschaft auf True gesetzt und ermöglichen horizontale und vertikale Scrollbar.

Die Schaltfläche heißt cmdCodiceHTML.

Bevor Sie fortfahren, müssen wir die MSHTML Bibliotheksreferenz, deren voller Name ist Microsoft HTML Object Library importieren.

Rufen Sie das Menü:

 



 Project / References ...

 

lokalisieren Sie den Eintrag, wählen Sie es aus und bestätigen Sie die Auswahl, wie im folgenden Bild dokumentiert:

Lassen Sie einen Doppelklick auf den Button, greifen wir auf die Sub-Routine Code und fügen Sie den folgenden Code:

 Private Sub cmdCodiceHTML_Click ()



    



 Dim Element As New MSHTML.HTMLDocument



    



 Dim Dokument Wie MSHTML.HTMLDocument



    



 September oggetto.createDocumentFromUrl document = (txtUrl.Text, vbNullString)



    



 Do While documento.readyState <> "complete"



        



 DoEvents



    



 Schleife



    



 txtCodiceHTML.Text = documento.documentElement.outerHTML



    



 September = Nothing Dokument



    



 September Object = Nothing







 End Sub

Der Code ist einfach: erklären, das Objekt zweimal serviert von cross-checking, öffnen wir die Web-Seite durch die Methode createDocumentFromUrl.

Effetuiamo einer Schleife, bis es den Status "abgeschlossen", dann bis zum Ende des Dokuments erreicht.

Einfügen von Text in das Textfeld des HTML-Codes durch die Eigenschaft schreibgeschützt (offensichtlich) outerHTML.