Riempire campi di pagina web

di il
2 risposte

Riempire campi di pagina web

Salve a tutti, ho la necessita' di riempiere in modo automatico i campi di una una pagina di un sito (la pagina e' in formato HTML) al quale mi sono precedentemente collegato con le istruzioni:

Private Sub mnuCOLLEGAMENTO_Click()
Dim TheBrowser As Object, I As Integer, orario As Date
Set TheBrowser = CreateObject("InternetExplorer.Application")
With TheBrowser
.Visible = True
.Navigate ("http://www.dir*****.com")
End With
end Sub


Ho provato con l' istruzione:
SendKeys (. . . )

ma non riempie i campi.
Qualcuno puo' aiutarmi?
Grazie

2 Risposte

  • Re: Riempire campi di pagina web

    L'idea del SendKeys la lascerei in 2° piano... anche perchè il focus deve essere spostato e ti assicuro che andare a cercare il Child Enumerando con le API i Figli dell'istanza di Explore è tutt'altro che banale...!

    Prova avedere questo esempio che potrebbe risolverti i problemi:


    L'esempio è in EarlyBinding, ovviamente tu lascia LATEBINDING che è decisamente meglio.
  • Re: Riempire campi di pagina web

    No riesco ad utilizzare l'esempio mi da errore di compliazione
Devi accedere o registrarti per scrivere nel forum
2 risposte