AutoIt Français

Code : Tout sélectionner

#include <IE.au3>

$Message = InputBox("Jeu des 3h", "Entrez la phrase :")                                         ;Saisie de la phrase.

sleep(10800000)
$oIE = _IECreate ("http://wwoy.forumactif.com/la-taverne-f4/le-jeu-des-3h-t1774.htm",0,1,1,1)   ;Lance en fenetre IE explorer à l'adresse indiquée.
_IELoadWait($oIE)                                                                               ;Permet d'attendre que la page soit lancée
$oSubmit = _IEGetObjByName ($oIE, "message")                                                    ;Recherche de la zone Message sur la Page internet. 
_IEAction ($oSubmit, "focus")                                                                   ;Place le curseur dans la zone Message.
_IEDocInsertText($oSubmit, $Message)                                                            ;Envoi du texte à poster.
sleep(500)
[color=#FF0000]$hwnd = _IEPropertyGet($oIE, "hwnd")                                                            ;Utilisation des Touches sous internet.
ControlSend($hwnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{Tab}")                 ;Deplacement sur Boutton
ControlSend($hwnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{Tab}")                 ;Deplacement sur Boutton
ControlSend($hwnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{Enter}")               ;Validation et Envoi.
sleep(3000)     
send("!{F4}")                                                                                   ;Ferme la fenetre Ouverte.[/color]

Code : Tout sélectionner

<input type="submit" [/b]name="post" class="mainoption" value="Envoyer" /></td><td class="row2" valign="top"><br /><br /><span class="genmed">