[C] Formulaires, message, barre d'attente (à assembler)
Posté : mer. 15 sept. 2010 09:42
Bonjour,
J'ai déjà presque tous les bouts de script (dans les balises code, et en fichier joint).
Voici ce que je souhaites avoir, si possible :
1-barre de chargement s'ouvre (j'ai le script).
2-Message apparait (Tooltip ?).
(2000 millisecondes)
3-Message disparait.
4-Question apparait (InputBox ?), la réponse donnée devient la variable $x.
5-Script de remplissage de formulaire (j'ai le script) se lance.
(fin du script de remplissage)
6-barre de chargement se ferme.
Si vous préférez une explication avec des phrases :
Et si c'est possible, je voudrais que le script de remplissage de formulaire soit isolé dans un autre au3, histoire de ne pas tout mélanger.
Barre de chargement :
Remplissage de formulaire.
Merci à celui ou ceux qui voudront bien m'aider !!
J'ai déjà presque tous les bouts de script (dans les balises code, et en fichier joint).
Voici ce que je souhaites avoir, si possible :
1-barre de chargement s'ouvre (j'ai le script).
2-Message apparait (Tooltip ?).
(2000 millisecondes)
3-Message disparait.
4-Question apparait (InputBox ?), la réponse donnée devient la variable $x.
5-Script de remplissage de formulaire (j'ai le script) se lance.
(fin du script de remplissage)
6-barre de chargement se ferme.
Si vous préférez une explication avec des phrases :
► Afficher le texte
Barre de chargement :
Code : Tout sélectionner
#include <GUIConstants.au3>
Opt("GUIOnEventMode", 1)
GUICreate("Titre.", 250, 70)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Close")
; Création du fond de notre control
GuiCtrlCreateGraphic(10, 20, 230,13)
; Définition de sa couleur (Blanc)
GUICtrlSetBkColor(-1, 0xEEEEEE)
; Création du cadre de notre control
GuiCtrlCreateGraphic(8, 18, 232,15)
; Définition de sa couleur (Noir)
GUICtrlSetColor(-1, 0x555555)
; Création de la barre de progression
$_bar = GuiCtrlCreateGraphic(50, 20, 49,12,$GUI_GR_PIXEL)
; Définition de sa couleur (bleu)
GUICtrlSetBkColor($_bar, 0xFFFFFF)
$lblInfos = GUICtrlCreateLabel("", 9, 40, 250,15)
GUISetState (@SW_SHOW)
; Entier définissant la direction de la barre
; 1: vers la droite
; -1: vers la gauche
$stateBar = 1
; Position initiale de la barre
; Doit être initialisée à la même valeur que le fond du control
$posBar = 10
$iID = Run(@ComSpec & " /c " & 'mspaint.exe', "", @SW_HIDE)
GUICtrlSetData($lblInfos,"Il pleut.")
While ($iID <> 0) ; Condition d'arrêt de la barre d'attente
sleep(10) ; Temps de fix de la barre
; Définition de la valeur suivante pour la position de la barre
; Si $stateBar = 1 alors $posbar = $posbar + 1
; Si $stateBar = -1 alors $posbar = $posbar + (-1)
$posBar += $stateBar
; On change la position de la barre
GUICtrlSetPos($_bar, $posBar, 20, 49, 12)
; Si la barre arrive au bout à droite ou au bout à gauche
; On inverse la direction
If $posBar = 10 Or $posBar = 188 Then
$stateBar *= -1
EndIf
$iID = ProcessExists($iID)
WEnd
GUICtrlSetData($lblInfos,"Fin de la barre.")
; Sert uniquement à garder la fenêtre ouverte
While 1
Sleep(1000)
WEnd
Func _Close()
Exit
EndFuncCode : Tout sélectionner
#include <IE.au3>
$oIE = _IECreate ()
_IENavigate ($oIE, "http://www.SITE.com")
_IELoadWait($oIE)
sleep(10000)
$oForm = _IEFormGetObjByName ($oIE, "authenticity_token")
$oQuery = _IEFormElementGetObjByName ($oForm, "email")
_IEFormElementSetValue ($oQuery, "INFORMATION")
_IEFormSubmit ($oForm)Merci à celui ou ceux qui voudront bien m'aider !!