Bonjour, je souhaiterais piloter mon navigateur WEB Edge, firefox ou Chrome pour me connecter automatiquement au site ZETURF.
J'ai réalisé un petit programme mais il semble dépassé, car il lance Internet Explorer. ça ne semble pas fonctionner avec autre chose.
Y a t'il un moyen plus récent de piloter mon navigateur internet avec Windev ??


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
37
38
39
ResHandle est entier système
ie est un objet Automation "internetexplorer.application"
ZonesSaisies est une chaîne
tIndustriel est un objet Automation dynamique
Boutons est un objet Automation dynamique
i est un entier
 
//oForm est un objet Automation dynamique
ie>>visible = True
 
ResHandle=ie>>hwnd
 
sUrl="https://www.zeturf.fr/fr"
LIB_SansNom1="Chargement de "+sUrl+"....."
ie>>navigate(sUrl)
TANTQUE ie>>Busy OR ie>>readyState <> 4
	Multitâche(100)
FIN
LIB_SansNom1="Page Chargée.."
Multitâche(300)
 
//Récupération des zones de saisie
tIndustriel = ie>>document>>GetElementsByTagName("input")
tIndustriel>>item(0)>>value = "MonIdentifiant"         //ID
tIndustriel>>item(1)>>value = "MonMotdePasse" //MDP
 
//Validation Saisie 
//On charge la collection "Boutons" 
Boutons = ie>>document>>getElementsByTagName("button")
FOR i = 0 TO Boutons>>Length - 1
	IF Boutons>>item(i)>>ID = "connection_submit" THEN 
		SORTIR
	FIN
FIN
Boutons>>item(i)>>Click
 
 
LIB_SansNom1="Quitte IE ....."
ie>>quit()