09/03/10 10:20
davifumi89
Ciao a tutti, sono un nuovo utente registrato.
Sto facendo un programmino in Excel utilizzando le Macro (quindi programmando in VB)
Nel Form di VB ho inserito un WEB BROWSER e 3 pulsanti per imparare ad interagire con pagine web tramite vb, cosicchè possa inserire alcuni dati presi da un sito in un foglio excel.
Il primo mi permette di raggiungere un sito internet specificato in una textbox.
In un altro ho testato il metodo POST (Me.WebBrowser1.Navigate2 URL, Flags, TargetFrame, PostData) e funziona.
Il terzo invece vorrei che aprisse (ad esempio) un sito che converte Euro in Dollari USA, inserisse nella text il valore in euro, schiacciasse il pulsante e acquisire in una variabile il risultato.
il codice è il seguete:
Questo dovrebbe inserire il valore 100 nella text degli Euro e schiacciare il pulsante.
Il codice sorgente HTML della pagina è il seguente:
Purtroppo se schiaccio il pulsante non funziona mi da il seguente errore:
"Variabile Oggetto o del blocco With non impostata"
ma se "skippo" con F8 inserisce effettivamente il valore "100" nella text, mentre sulla seconda funzione che dovrebbe schiacciare il tasto sul sito per convertire si ferma e mi da il seguente errore:
"Proprietà o metodi non supportati dall'oggetto"
Ho appena cominciato a programmare con il Web Browser e le funzioni sono esempi che ho trovato su internet.
Sapreste darmi una mano???
Grazie mille per l'attenzione,
Davide
Sto facendo un programmino in Excel utilizzando le Macro (quindi programmando in VB)
Nel Form di VB ho inserito un WEB BROWSER e 3 pulsanti per imparare ad interagire con pagine web tramite vb, cosicchè possa inserire alcuni dati presi da un sito in un foglio excel.
Il primo mi permette di raggiungere un sito internet specificato in una textbox.
In un altro ho testato il metodo POST (Me.WebBrowser1.Navigate2 URL, Flags, TargetFrame, PostData) e funziona.
Il terzo invece vorrei che aprisse (ad esempio) un sito che converte Euro in Dollari USA, inserisse nella text il valore in euro, schiacciasse il pulsante e acquisire in una variabile il risultato.
il codice è il seguete:
Private Sub CommandButton3_Click() URL = "http://www.viaggiatori.net/pagine/monete/USD.php" Me.WebBrowser1.Navigate2 URL WebBrowser1.Document.forms(1).input.Value = 100 WebBrowser1.Document.forms(1).submit.submit End Sub
Questo dovrebbe inserire il valore 100 nella text degli Euro e schiacciare il pulsante.
Il codice sorgente HTML della pagina è il seguente:
<form action="" method="" onSubmit="convert(this);return false;"> <input type="hidden" name="exchangevalue" value="1.3662"> <table class="cambi"> <tr> <td nowrap width="200" align="right" width="40%"> Euro<br><input type="text" name="input" value size="10"></td> <td align="center" width="10%"><br /><input name="submit" type="submit" value="Converti"></td> <td nowrap width="200" align="left" width="40%"> Dollaro USA <br><input type="text" name="result" value size="10"></td> </tr> </table> </form>
Purtroppo se schiaccio il pulsante non funziona mi da il seguente errore:
"Variabile Oggetto o del blocco With non impostata"
ma se "skippo" con F8 inserisce effettivamente il valore "100" nella text, mentre sulla seconda funzione che dovrebbe schiacciare il tasto sul sito per convertire si ferma e mi da il seguente errore:
"Proprietà o metodi non supportati dall'oggetto"
Ho appena cominciato a programmare con il Web Browser e le funzioni sono esempi che ho trovato su internet.
Sapreste darmi una mano???
Grazie mille per l'attenzione,
Davide
aaa