Objet Internet Explorer/ Méthode getElementById

Version imprimable

Bonjour, j'ai un petit problème, j'ai un code en VBS permettant d'envoyer des données recueillies vers une base de données en passant par une page php.
Lorsque j'étais sous IE 8 cela fonctionnait parfaitement, mais depuis IE 9 il ne fonctionne plus et me renvoie l’erreur "Erreur d’exécution Microsoft VBScript: Objet requis: 'IE.document.getElement.ById(...)'.

Voici mon code:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Set IE = CreateObject("InternetExplorer.Application") IE.Visible = 1 IE.navigate "http://iutstage2.univ-lr.fr/test/test.php" Do While (IE.Busy) WScript.Sleep 10 Loop Set Helem = IE.document.getElementById("add_ip") Helem.Value = tabip(4) Set Helem = IE.document.getElementById("nom_machine") Helem.Value = tabnom(0) Set Helem = IE.document.getElementById("id_salle") Helem.Value = idsalle Set Helem = IE.document.getElementById("date") Helem.Value = pouet Set Helem = IE.document.getElementById("debit") Helem.Value = debit Set Helem = IE.document.forms (0) Helem.submit IE.quit
Il y a t'il une solution sous IE9 ?
Merci d'avance

Pas des plus propre comme code, mais j'ai eu la même problématique, la seul solution pour moi a été de cette façon

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Do While (IE.Busy)
    on error resume next
    Set Helem = IE.document.getElementById("add_ip")
    if err then
        err.Clear
        WScript.Sleep 10
        else
        exit do
    end if
Loop
'Set Helem = IE.document.getElementById("add_ip")
Helem.Value = tabip(4)
Set Helem = IE.document.getElementById("nom_machine")

23/05/2011, 19h43
Othasm

Merci beaucoup de ta réponse, j’essaierai dès demain matin ! :ccool:
24/05/2011, 09h30
Othasm

Bonjour, j'ai essayé ta solution, en effet le message d'erreur ne s'affiche plus. Cependant les valeurs ne s’insèrent pas dans mon formulaire PHP.

Ça y est j'ai trouvé comment faire ! Voici à quoi ressemble mon code désormais.
Merci quand même du conseil :ccool:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = 1
IE.navigate "http://iutstage2.univ-lr.fr/test/test.php"
Do While (IE.Busy)
    WScript.Sleep 10
Loop
IE.document.all("add_ip").Value = tabip(4)
IE.document.all("nom_machine").Value = tabnom(0)
IE.document.all("id_salle").Value = idsalle
IE.document.all("date").Value = pouet
IE.document.all("debit").Value = debit
Set Helem = IE.document.forms (0)
Helem.submit
 
IE.quit

05/10/2017, 03h47
ologram00

recuperer un contenu link

Bonjour, si vous avez une url:
<a href="www.google.dz"></a>
Donc je dois instancier un object nome quelquonque,
Telque exemple:
Ie que je formulerai la syntaxe comme suit:
Ie.document.all.tags("a").
Es ce que vous avez travaillez avec ses methodes?