Discussion :

[yoyof]

Bonjour à tous,

je cherche à me connecter à un site web à partir d'Excel.
Mon problème vient du fait que le login et le mot de passe sont à entrer dans un popup et pas sur la page Internet elle-même...

Quelqu'un saurait-il comment piloter un tel popup, svp?

L'URL en question est: https://groupe-france.adecco.net

Merci par avance.

Yohann

[yoyof]

Pour info, j'ai trouvé (merci Internet et notamment le site ci-dessous).

Il suffit de lancer un script contenu dans un fichier VBS en début de macro.
Ce script scrute l'apparition du pop up (qui s'appelle Sécurité de Windows).

Contenu du fichier VBS:

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
29
30
31
32
33
34
35
36
'Creating a script object
Set oWSH = CreateObject("WScript.Shell")
 
'Activating alert screen    
 
Do
	ret = oWSH.AppActivate ("Sécurité de Windows")
Loop Until ret = True
 
 
WScript.Sleep 500
ret = oWSH.AppActivate ("Sécurité de Windows")
 
If ret = True Then
	ret = oWSH.AppActivate ("Sécurité de Windows")
	WScript.Sleep 10
 
	'Passing the value UserName/UserID
	oWSH.SendKeys "XXXXXXXXXXXXXXXXX"     'ensure to complete the username with apropriate domain e.g.
	WScript.Sleep 10
 
	'Changing the focus to password textbox
	oWSH.SendKeys "{TAB}"
	WScript.Sleep 10
 
	'Passing the value password
	oWSH.SendKeys "XXXXXXXXXXXXXXXXX" 'password
	WScript.Sleep 10
 
	'Clicking enter to complete the screen
	oWSH.SendKeys "{ENTER}"
End If
 
	'Releasing the script object
	Set oWSH = Nothing
WScript.Sleep 500

Et dans la macro, on a ceci avant de demander l'accès au site en question:

Code :

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

Shell "wscript.exe ""chemin\fichier.vbs"""

Mon problème suivant est que le script reste actif après coup, mais ça fait l'objet d'une autre discussion:
http://www.developpez.net/forums/d16...ete-fin-macro/

A bientôt,
Yohann

[patricktoulon]

Bonsoir
dans plusieurs de mes discussions il en est question de (vbs sendkeys) tu trouvera dans certaines d'entre elle comment je le fait dynamiquement et aussi comment je rend ce vbs dynamique auto destructible

[yoyof]

Merci à toi.
Par contre, tu me conseilles quel fil en particulier stp?

J'en ai parcouru plusieurs mais j'avoue avoir du mal à trouver mon bonheur.

Entre temps, j'ai obtenu une méthode sur http://www.mrexcel.com/forum/excel-q...ml#post4703874

Il faut ajouter une tempo sur l'appel du script:

Code :

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

Shell "wscript.exe ""chemin\fichier.vbs"" //T:20"

Merci à toi en tout cas.