blueteen | bien pour le userprofile, gt en train de faire un truc de fou
donc on reprend, et bagu aura toutes les cartes en main pour adapter son script :
Code :
- ;Ouverture d'une boîte de dialogue
- MsgBox, 4, Sauvegarde, Voulez-vous effectuer la sauvegarde d'Axisanté/Onet ?
- ;Si oui est cliqué, alors on va à la suite de la sauvegarde
- IfMsgBox, YES, Goto, sauvegarder
- ;Sinon on ferme tout
- IfMsgBox, NO, Goto, annulation
- ;
- sauvegarder:
- ;
- ;Teste l'existence de xcopy (par défaut sous win en principe)
- IfExist, C:\\windows\\system32\\xcopy.exe, Goto, fileexist
- ;si ça existe on continue l'exécution
- ;
- ;Sinon on affiche une boite de dialogue avec juste un bouton OK
- MsgBox, 0, Erreur, Le fichier xcopy est manquant ! Contactez votre administrateur.
- ;Et donc en cliquant sur ok, on sort de l'opération de sauvegarde
- Goto, annulation
- ;
- ;Si le fichier xcopy existe, on effectue donc ce qui suit
- ;
- fileexist:
- ; définition de la variable du dossier à sauver
- SetEnv, axisante2000, \"C:\\Program Files\\axisanté2000\\*.*\"
- ;
- ; définition de la variable du dossier de destination
- SetEnv, destination, \"%userprofile%\\Bureau\\sauv-axisanté\"
- ;
- ;emplacement de la commande dos à lancer
- SetEnv, copy, c:\\windows\\system32\\xcopy
- ;
- ;définition des commutateurs à utiliser
- SetEnv, commutateurs, /e /c /i /h /r /k /y
- ;Ces variables permettent une meilleure lisibilité du code
- ;
- ;Et on lance la commande proprement dite
- Run, %COMSPEC% /c %copy% %axisante2000% %destination% %commutateurs%
- ;Et on sort du programme
- Exit
- ;
- annulation:
- Exit
|
et comme tu le dis, on créé un .exe nickel, avec mot de passe pour pas qu'il soit décompilé, icône de son choix, boîtes de dialogue, et ça fait le café : ah non que dans la version 1.2 |