Corsi on-line

Leggere il codice HTML di una pagina Web con VB6 ed MSHTML

  • CommentiScrivi un commento
  • ForumDiscuti sul forum
  • PrevUn calendario in Visual Basic
  • NextMenu dal tasto destro in Visual Basic 6

L'oggetto MSHTML permette in Visual Basic 6 di eseguire una serie di operazioni legate ad Internet ed alle pagine Web.

Vediamo in questo articolo come fare, attraverso un form VB6 accuratamente costruito, a leggere il codice HTML remoto di una pagina Web.

L'articolo continua dopo la pubblicità

Apriamo la nostra copia di Visual Basic 6 e creiamo un nuovo EXE. Creiamo un form e disegnamolo come nell'immagine che segue che rappresenta il risultato finale dell'articolo in oggetto:

Gli elementi principali, le cui proprietÓ vanno gestite direttamente dall'IDE di VB6, sono la casella di testo, la textarea ed il bottone di comando.

La casella di testo si chiamerÓ txtUrl e le assegneremo come testo di default "http://".

La textarea si chiamerÓ txtCodiceHTML, cancelleremo il testo contenuto, imposteremo su True la proprietÓ Multiline ed abiliteremo le Scrollbar in orizzontale ed in verticale.

Il bottone di comando si chiamerÓ cmdCodiceHTML.

Prima di proseguire dobbiamo importare il riferimento alla libreria MSHTML il cui nome completo Ŕ Microsoft HTML Object Library.

Accediamo al menu:

Progetto / Riferimenti...
localizziamo la voce, selezioniamola e confermiamo la selezione, come documentato nell'immagine che segue:

Facciamo doppio click sul bottone, accediamo al codice della sub routine ed inseriamo il seguente codice:
Private Sub cmdCodiceHTML_Click()
    Dim oggetto As New MSHTML.HTMLDocument
    Dim documento As MSHTML.HTMLDocument
    Set documento = oggetto.createDocumentFromUrl(txtUrl.Text, vbNullString)
    Do While documento.readyState <> "complete"
        DoEvents
    Loop
    txtCodiceHTML.Text = documento.documentElement.outerHTML
    Set documento = Nothing
    Set oggetto = Nothing
End Sub
Il codice Ŕ semplice: dichiariamo due volte l'oggetto, servendoci per dei controlli incrociati; apriamo l pagina Web attraverso il metodo createDocumentFromUrl.

Effetuiamo un ciclo fino al raggiungimento dello stato "complete", quindi fino alla fine del documento.

Inseriamo nella textarea il testo del codice HTML attraverso la proprietÓ di sola lettura (ovviamente) outerHTML.

Corsi
  • Corso MS Access
    Corso MS Access
    Impara a creare e gestire database in maniera semplice e veloce. A partire da 29 €
  • Corso Visual Basic 6
    Corso Visual Basic 6
    Realizzare applicazioni Desktop con VB6. A partire da 39 €
Vedi anche...
Guide