Visualizzazione dei risultati da 1 a 6 su 6
  1. #1
    Utente di HTML.it
    Registrato dal
    May 2008
    Messaggi
    203

    [VB.NET] aiuto oggetto Internet Explorer

    Ciao a tutti,

    tempo fa in VB6 usavo la chiamata Document.getelementbyid per scrivere nei campi contenuti in una pagina web (esempio username e password)

    adesso in VB.NET chreo l'oggetto Internet Explorer come indicato sotto
    ma non riesco ad usare la voce getelementbyid

    sapreste aiutarmi ?

    Grazie

    codice:
     Dim objExplorer As SHDocVw.InternetExplorer
    
    objExplorer.Navigate("http://miosito.web")
    objExplorer.Visible = True

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,480
    Cosa intendi con "non riesco a utilizzare"? Hai un errore? Non trovi il metodo?
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Utente di HTML.it
    Registrato dal
    May 2008
    Messaggi
    203
    esatto
    non trovo il metodo

    objExplorer.Document.getelementbyid("username") = "MiaUser"

    non funziona...e nemmeno

    objExplorer.Document.getelementbyid.("username") = "MiaUser"


    sapete indicarmi una soluzione ?

    Grazie

  4. #4
    Utente di HTML.it
    Registrato dal
    May 2008
    Messaggi
    203
    ho anche provato in VB6

    questo codice ricerca tutte le finestre di internet explorer
    e poi con objExplorer.document.getElementById("username").Va lue = "MiaUser"
    dovrebbe settare eventuali campi "username" con la user specificata

    solo che ricevo il seguente errore :

    Errire di run-time '91':

    Variabile oggetto o variabile del blocco With non impostata

    come faccio a poter compilare quel campo ?

    Grazie ancora!

    codice:
    Dim objShellWins As New SHDocVw.ShellWindows
    Dim objExplorer As SHDocVw.InternetExplorer
    
    
    Dim Documentoument As HTMLDocument
    Dim Trovato As Boolean
    Dim Eseguito As Boolean
    Screen.MousePointer = vbHourglass
    
    'Scorri tutte le fineste aperte
    For Each objExplorer In objShellWins
    
    
    
    If TypeOf objExplorer.document Is HTMLDocument Then
    
    Set Documentoument = objExplorer.document
    
    objExplorer.document.getElementById("username").Value = "MiaUser"
    
    
    End If
    Next
    Screen.MousePointer = vbDefault

  5. #5
    Utente di HTML.it L'avatar di cassano
    Registrato dal
    Aug 2004
    Messaggi
    3,002
    Guarda Qui o qui

  6. #6
    Utente di HTML.it
    Registrato dal
    May 2008
    Messaggi
    203
    purtroppo nada...
    non sono riuscito a risolvere

    altri consigli ?

    tnks ancora

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.