[QUOTE]Così recuperi tutti i collegamenti ipertestuali. Nel ciclo objLink è l'url, quindi puoi esaminarla e vedere se ti interessa o meno./QUOTE]codice:Dim objLink As HTMLLinkElement For Each objLink In objDoc.links ..... Next
Sto perdendo la testa vicino sto Visual Basic 6 ormai da 4 ore consecutive e non ci riesco in nessun modo a recuperare i collegamenti ipertestuali dal codice HTML con msHTML.
Qualcuno mi può aiutare per vore ????![]()
![]()
VVoVe:
![]()
![]()
![]()
Per maggiori info vi segno un può la struttura del mio programmino:
Questo è il codice del mio programmino, dovrei fare ora in modo che oltre a recuperare codice HTML da un URL mi deve stamparare nella ListBox di nome listEmail i collegamenti ipertestuali che ci sono in quella pagina.codice:Option Explicit Dim objMSHTML As New MSHTML.HTMLDocument Dim objDoc As MSHTML.HTMLDocument Private Sub Recupera_Click() Set objDoc = objMSHTML.createDocumentFromUrl(txtURL.Text, vbNullString) Do While objDoc.readyState <> "complete" DoEvents Loop txtCode.Text = objDoc.documentElement.outerHTML Set objDoc = Nothing Set objMSHTML = Nothing End Sub
Qualcuno mi può per favore modificare il mio codice facendo in modo che recupera anche i collegamenti ipertestuali di quella pagina...

VVoVe:

Rispondi quotando