Bonjour,

Je suis occupé de tenter la chose suivante ; j'ouvre un Internet explorer, je me connecte à une page contenant un formulaire de recherche. J'envoie une valeur à rechercher dans un formulaire de recherche. je lance la recherche et obtient le formulaire mis à jour avec les valeurs résultant de la recherche.
Le problème, comment lire les valeurs des champs du formulaire en VBA ?

Le code actuel ;

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Set IE = CreateObject("InternetExplorer.Application")
                    IE.Visible = True
                    IE.navigate "http://www.gatwickaviationsociety.org.uk/modeslookup.asp"
 
                    ' Attendre la fin du chargement de IE
                    Do While IE.busy
                    Loop
 
                    On Error Resume Next
                    Do
                    Loop While (IE.Document.script.CheckVal() = 0)
 
                    SendKeys "+{TAB}", True
                    Chaine = "400936"
                    SendKeys Chaine, True
                    SendKeys "{ENTER}", True
 
                    Quand = Time()
                    X = 10
                    X = X / 24 / 60 / 600
                    While Quand + X >= Time()
                    Wend
 
                    'Test = IE.Document.body.outerHTML
                    'Test = IE.Document.getElementsByTagName("DType").Item
 
                    'Test = IE.Document
                    'MsgBox "test" & Test.getElementsByTagName("Dtype").Item(0).outerhtml
Comment faire pour lire les valeurs des champs de formulaire ?
Les champs s'appellent MSC, registration, DType, DSerial, ...

Un GRAND merci pour votre aide, je bute là dessus depuis pas mal de temps.

Laurent