Bonjour à tous,
J'ai longuement chercher sur le forum pour trouver une func pour modifié le message personnel sur MSN !
Mais échec, je n'ai pas trouvé de quoi me réjouir !
Donc je m'en remet à vous !
Le script que je vous demande ne servira qu'a crée un mini tools permettant de gagner du temps pour le choix du message ... Bref vous l'aurez compris !
J'ai besoin d'une fonction qui n'utilise pas la souris, donc un truc discret, donc je n'aime pas trop cela (ci-dessous).
► Afficher le texteexemple de fonction pris de l'UDF de GoldenSun2
Code : Tout sélectionner
Func Options()
$Pseudo = InputBox("Pseudo", "Veuillez entrer le nouveau pseudo. Si vous ne voulez pas le changer, laisser le champs vide.")
$MessPerso = InputBox("Message Personel", "Veuillez entrer le nouveau message personnel. Si vous ne voulez pas le changer, laisser le champs vide.")
If $Pseudo <> "" & $MessPerso <> "" Then
GoMsn()
Sleep(100)
GoOptions()
Sleep(100)
Send($Pseudo & "{TAB}" & $MessPerso & "{ENTER}")
Send("!{F4}")
ElseIf $Pseudo <> "" & $MessPerso == "" Then
GoMsn()
Sleep(100)
GoOptions()
Sleep(100)
Send($Pseudo & "{ENTER}")
Send("!{F4}")
ElseIf $Pseudo == "" & $MessPerso <> "" Then
GoMsn()
Sleep(100)
GoOptions()
Sleep(100)
Send("{TAB}" & $MessPerso & "{ENTER}")
EndIf
EndFunc
Merci d'avance !
A bientôt !
) :
