[R] Comment stopper un script

[superficiel]

J'ai créé une ligne

Code : Tout sélectionner

MsgBox (4, "Script" , "Voulez-vous continuer ?")

Pourtant, que je clique sur oui, ou sur non, le résultat est le même...
Le process continue..
Any one ?

[TT22]

Quelque chose comme ça :

Code : Tout sélectionner

FileMove("C:\Pj 27\pdc\"&StringRight(@YEAR,2)&"\"&@MON&"\"&@MDAY&"\*.*" , "C:\Pj 27L\pdc\"&StringRight(@YEAR,2)&"\"&@MON&"\"&@MDAY&"\*.pdc")

[superficiel]

Pas mal.. j'avoue ne pas bien avoir compris ce que tu as écris, mais ça fonctionne.. décidément, moi le dev...
Une dernière chose alors, vu que tu sembles être "bon"
J'ai créé une boite de message invitant l'utilisateur à cliquer sur oui ou sur non.. Le truc s'est que, que je clique sur oui, ou sur non, le résultat est le même.. Le script continu de tourner..
Quelle est la commande pour stopper le script si je clique sur non et la continuer si je clique sur oui ??

[PandiPanda]

essayer ceci ?

Pour l'InputBox():

Code : Tout sélectionner

InputBox("mon titre","quoi?")
If @error Then
    MsgBox(0,'quitter','quittons ce joli script')
Else
    MsgBox(0,"pas de prob'","continuons ce joli script")
EndIf

► Afficher le texte

Return Value

Success: Returns the string that was entered.
Failure: Returns "" (blank string) and sets @error as follows:
@Error 0 = The string returned is valid.
1 = The Cancel button was pushed.
2 = The Timeout time was reached.
3 = The InputBox failed to open. This is usually caused by bad arguments.
4 = The InputBox cannot be displayed on any monitor.
5 = Invalid parameters width without height or left without top.

Pour la MsgBox():

Code : Tout sélectionner

Local $id=MsgBox(1,"mon titre","continuer ?")
If $id <> 1 Then
    MsgBox(0,'quitter','quittons ce joli script')
Else
    MsgBox(0,"pas de prob'","continuons ce joli script")
EndIf

► Afficher le texte

Return Value

Success: Returns the ID of the button pressed.
Failure: Returns -1 if the message box timed out.



Button Pressed Return Value
OK 1
CANCEL 2
ABORT 3
RETRY 4
IGNORE 5
YES 6
NO 7
TRY AGAIN ** 10
CONTINUE ** 11

[TT22]

Pour savoir quel bouton a été appuyé, il faut utiliser la valeur du retour de la MsgBox (6 pour "Oui" et 7 pour "Non").
Ce qui donne :

► Afficher le texte

Code : Tout sélectionner

$Return = MsgBox(4,"Info","Choisis quelque chose...")
If $Return = 6 Then
    MsgBox(64,"Info","Vous avez appuyé sur oui !")
ElseIf $Return = 7 Then
    MsgBox(16,"Info","Vous avez appuyé sur non !")
EndIf

Et quand à mon script :

Code : Tout sélectionner

StringRight(@YEAR,2)& _ ; Retourne les deux dernier caractères de la macro @YEAR (qui donne l'année actuelle).
"\"&@MON& _ ; Met un contre-slash et le mois actuel (macro @MON).
"\"&@MDAY ; ; Met un contre-slash et le jours actuel (macro @MDAY).

Et si pour l'anné, j'utilise la fonction StringRight, c'est parceque la macro @YEAR renvois 2012 et pas 12 comme tu le voulais.

Voilà, j'espère que tu as compris

Edit : Doublé par PandiPanda

[superficiel]

Je me suis servi du script fournis par TT22 mais malheureusement, ça n'a pas fonctionné.
J'ai ajouté la commande exit(chemin du script) au niveau du ElseIf $Return = 7 Then..
Et là, le process s'est bien arrêté..
Je ne pense pas que ce soit très propre mais bon..
Merci pour votre aide en tout cas !!!!

[Wardow]

Bien sur, pour que le script sarrette, il faut mettre exit mais par contre je ne vois pas pourquoi avoir mis le chemin de script.

[TT22]

Excuse moi superficiel mais peux-tu me dire pourquoi tu as modifié le titre de ton premier message et surtout son contenu ?
Parceque maintenant se sujet n'as plus aucun sens

Le titre demande comment stopper un script, le contenu de ton message pose une question sur des MsgBox, et moi je te répond avec des FileMove.

Y'a vraiment de quoi devenir fou

[mikell]

Gné