Discussion :

[yaxari07]

Bonjour,

Je souhaite me connecter automatiquement au site suivant: http://www.ff-handball.net/index.html

J'ai récupérer un bout de vbs qui visiblement doit executer la connexion auto, pouvez-vous m'aider à l'adapter à mon site:

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
Dim IE
Set IE = Wscript.CreateObject("InternetExplorer.Application")
IE.Visible = 1 
 
IE.navigate "http://www.ff-handball.net/index.html"
Do While (IE.Busy)
    WScript.Sleep 10
 
Loop
Set pFrame = IE.document.frames("Pub")
 
Set Helem = pFrame.document.getElementsByName("j_username")(0)
Helem.Value = "xxxxxxx"
 
Set Helem = pFrame.document.getElementsByName("j_password")(0)
Helem.Value = "xxxxxxx"
 
 
Set Helem = pFrame.document.Forms(0)
Helem.Submit

Je pense que le problème vient des frames, mais comment connaitre leur nom ???

Merci pour votre aide

Cordialement

[SfJ5Rpw8]

Il se passe quoi ?

[yaxari07]

Bonsoir,

Il se passe que le la page du site s'ouvre bien puis j'ai le message suivant:

(10, 1) (null): Membre introuvable.


Cordialement

[SfJ5Rpw8]

Je ne vois pas tes "frames"... essai :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Set Helem = IE.document.getElementsByTagName("input")
Helem("LOGIN").Value = "xxxxxxx"
Set Helem = IE.document.getElementsByName("PASSWORD")(0)
Helem.Value = "xxxxxxx"
Set Helem = IE.document.Forms(0)
Helem.Submit

[yaxari07]

Merci !

ça marche nickel !

Cordialement