Page 1 sur 1

[R] Se connecter Automatiquement a Internet

Posté : lun. 02 juin 2008 22:03
par timmalos
Bonjour a tous: je suis dans le codage de 2 applications ou je vais avoir besoin de la meme fonction:
La premiere doit me reconnecter à Internet dès que mon Internet saute: je veux dire par la que (je suis a tele2 adsl )ma connexion quand elle se coupe , relance deja automatiquement le modem, mais pas Internet lui meme, donc quand je telecharge la nuit (legalement) les telechargements se bloquent,ce qui pose un petit probleme...

La deuxieme qui est plus importante est une appli qui inclu dans son contexte une page internet: j'ai deja créé une fonction qui avertie si l'utilisateur n'est pas connecté à Internet, mais je viens de voir que , certaines appli qui au lancement de l'ordinateur, lancaient la connexion internet toutes seules:(real player par exemple qui cherchait si il y avait nouvelle maj et s'est connecté tout seul a internet (quand le modem est en route est lancé))
ou quand firefox se lance, il ouvre la meme fenetre en lancant la connexion.

Je ne sais pas si je me suis correctement exprimé mais en fait, car je ne m'y connait pas trop dans ce secteur, il y a la connexion generale ( se remet automatiquement en route apres bug) mais il y a la (sous)connexion internet qui elle ne se remet pas toujours automatiquement.

ce sont sensiblement la meme question, donc est ce possible en autoit d'appeler cette fenetre? car je me doute qu'il suffit d'appeler une dll windows mais je ne connait pas du tout:)
Merci a tous

Re: [..]Se connecter Automatiquement a Internet

Posté : lun. 02 juin 2008 22:11
par jbnh
Pour te connecter a internet télé2 (je connais pas étant belge) tu dois faire comment? Si c'est juste un exe, tu peux faire un shellexecute.

Et donc simplement détecter grace à ta fonction si il y a plus internet et alors lancer cet exe.

Ici pour détecter facilement si tu est connecté a internet :

Code : Tout sélectionner

If NOT _Connect_Status() Then MsgBox(0, "Connection Status", "The internet connection has been lost")
Func _Connect_Status()
   $cStatus = DllCall("WinInet.dll", "int", "InternetGetConnectedState", "int_ptr", 0, "int", 0)
   Return $cStatus[0]
EndFunc

Re: [..]Se connecter Automatiquement a Internet

Posté : lun. 02 juin 2008 22:15
par timmalos
le probleme est que je compte distribuer la 2eme appli et que tout le monde n'a pas tele2 :)
Comme Firefox y arrive je me suis dit que les plus forts d'entre vous y arriveraient:)

Re: [..]Se connecter Automatiquement a Internet

Posté : lun. 02 juin 2008 22:25
par jbnh
La deuxieme appli : tu veux quelle prévienne l'utilisateur sur une page internet qu'il n'est pas connecté à internet?

Re: [..] Se connecter Automatiquement a Internet

Posté : mar. 03 juin 2008 09:34
par timmalos
non je voudrais qu'elle affiche une page internet (deja codé) mais que si rien ne s'affiche (alors il y a une erreur internet) elle relance la connexion puis se reactualise.

Re: [..] Se connecter Automatiquement a Internet

Posté : mar. 03 juin 2008 17:00
par jbnh

Code : Tout sélectionner

$file = FileOpen("log.txt", 1)

If $file = -1 Then
    MsgBox(0, "Error", "Le fichier n'est pas trouvé.")
    Exit
EndIf

FileWriteLine($file, "Lancement de l'internet le" & _
        @MDAY & _
        "-" & _
        @MON & _
        "-" & _
        @YEAR & _
        "---" & _
        @HOUR & _
        ":" & _
        @MIN & _
        ":" & _
        @SEC)

While 1
    Select
       Case Ping("www.google.com") > 0 ;le site en question
        
        Case Else
            FileWriteLine($file, "Down?  " & _
                    @MDAY & _
                    "-" & _
                    @MON & _
                    "-" & _
                    @YEAR & _
                    "---" & _
                    @HOUR & _
                    ":" & _
                    @MIN & _
                    ":" & _
                    @SEC)
    EndSelect
    Sleep(1000)
WEnd

Func OnAutoItExit()
    FileWriteLine($file, "Fin de la connection le" & _
            @MDAY & _
            "-" & _
            @MON & _
            "-" & _
            @YEAR & _
            "---" & _
            @HOUR & _
            ":" & _
            @MIN & _
            ":" & _
            @SEC)
EndFunc   ;==>OnAutoItExit
Ce qui donne :
Lancement de l'internet le 11-05-2008---12:00:16
Down? 11-05-2008---12:00:53
Down? 11-05-2008---12:01:14
Fin de la connection le 11-05-2008---12:03:04

Avec ca, tu devrais pouvoir faire qqchose. Ca correspond un peu avec ton idée.

Bonne chance :) :roll:

Re: [..] Se connecter Automatiquement a Internet

Posté : mar. 03 juin 2008 17:03
par Tlem
L'utilisation de la fonction _FileWriteLog me semble plus indiquée.