Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[R] Ouvrir un fichier ou executer un fichier
Auteur Message
Répondre en citant
Message [R] Ouvrir un fichier ou executer un fichier 
Salut a tous,
Chui desole de vous demander ca d'autant plus que je pense que la reponse doit etre assez simple mais ca fait dejà un bout de temps que je cherche et que je trouve pas^^":

Voilà mon code:

Code:

Voilà mon programme AutoItLanceur.au3

#include <ButtonConstants>
#include <GUIConstantsEx>
#include <StaticConstants>
#include <WindowsConstants>
#Region ### START Koda GUI section ### Form=
Global $GUI = GUICreate("AutoIt - LCR", 186, 146, 363, 432)
Global $Button1 = GUICtrlCreateButton("SciTE", 8, 112, 75, 25)
Global $Button2 = GUICtrlCreateButton("Sauvegardes", 96, 112, 75, 25)
Global $Button3 = GUICtrlCreateButton("AutoIt", 8, 80, 75, 25)
Global $Button4 = GUICtrlCreateButton("Koda", 96, 80, 75, 25)
Global $Label1 = GUICtrlCreateLabel("Ce programme permet le lancement des programmes suivants ou l'ouverture du dossier ""Sauvegardes"".", 16, 8, 156, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
   Case $GUI_EVENT_CLOSE
      Exit
   Case Global $Button3
      ShellExecute ("L:\Z-Lanceur\Programmes\AutoIt\AutoIt3\Sauvegardes\test1.txt" )
   Case Global $Button4
      ShellExecute ("L:\test2.txt" )
   Case Global $Button1
      ShellExecute ("L:\Z-Lanceur\test3.txt" )
   Case Global $Button2
      MsgBox (0, "rien", "rien")

 EndSwitch
WEnd


Voilà,
Je voudrais savoir pourquoi quand je clique sur le bouton 2 la msgbox ne s'execute pas. Je voudrai aussi savoir comment on fait pour ouvrir un fichier (de n'importe quelle extention genre .mp3 .jpg .exe .lnk... Et comment integrer une macro dans mon code pour eviter de taper a chaque fois le chemin complet (ex: TEST1.txt est dans le mm dossier que le programme AutoItLanceur.au3, et les autres sont sur le mm disque dur.


Je vous remercie par avance de votre reponse;
Bye,
Ludoo Wink




______________________________________________________
Je suis en train de créer un petit site:
http://ludooindustries.p.ht/

N'hésitez pas à me dire ce que vous en pensez =)
Visiter le site web du posteur
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [R] Ouvrir un fichier ou executer un fichier 
Bonjour de memoire il n'est pas ideal de mettre dans les Case un global, tu dois déclarer tes variables avant. Ce que tu as fait dans la Gui, il est donc inutile de déclarer deux fois.
Attention à la syntaxe des commandes.

il manque les extensions à tes includes... Utilise OrgonizeInclude dans Scite pour controler.

Code testé sous win xp , le bouton 2 m'affiche bien la msgbox.
Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $GUI = GUICreate("AutoIt - LCR", 186, 146, 363, 432)
Global $Button1 = GUICtrlCreateButton("SciTE", 8, 112, 75, 25)
Global $Button2 = GUICtrlCreateButton("Sauvegardes", 96, 112, 75, 25)
Global $Button3 = GUICtrlCreateButton("AutoIt", 8, 80, 75, 25)
Global $Button4 = GUICtrlCreateButton("Koda", 96, 80, 75, 25)
Global $Label1 = GUICtrlCreateLabel("Ce programme permet le lancement des programmes suivants ou l'ouverture du dossier ""Sauvegardes"".", 16, 8, 156, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
   Case $GUI_EVENT_CLOSE
      Exit
   Case $Button3
      ShellExecute ("L:\Z-Lanceur\Programmes\AutoIt\AutoIt3\Sauvegardes\test1.txt" )
   Case $Button4
      ShellExecute ("L:\test2.txt" )
   Case $Button1
      ShellExecute ("L:\Z-Lanceur\test3.txt" )
   Case $Button2
      MsgBox(0,"rien","rien")
 EndSwitch
WEnd


Pour le reste, il faut que tu cherches dans la documentation en appuyant sur F1 lorsque tu utilises Scite

Citation:

Je voudrai aussi savoir comment on fait pour ouvrir un fichier (de n'importe quelle extention genre .mp3 .jpg .exe .lnk

Voir FileOpenDialog
Citation:

... Et comment integrer une macro dans mon code pour eviter de taper a chaque fois le chemin complet (ex: TEST1.txt est dans le mm dossier que le programme

Pas très bien compris, je pense que fileopendialog devrait répondre à ta question, peut être ajouter un @ScriptDir ou @ScriptDirFullPath quelque part...

Exemple :
Code:
ShellExecute ("L:\Z-Lanceur\Programmes\AutoIt\AutoIt3\Sauvegardes\test1.txt" )

Code:
ShellExecute(@ScriptDir&"\Programmes\AutoIt\AutoIt3\Sauvegardes\test1.txt")

A adpater en fonction de l endroit du script
ensuite ben faudrait détailler avec précision ce que tu veux faire exactement et ce que doit faire ton programme.




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message [R] Ouvrir un fichier ou executer un fichier 
Ok merci beaucoup de ta reponse =)




______________________________________________________
Je suis en train de créer un petit site:
http://ludooindustries.p.ht/

N'hésitez pas à me dire ce que vous en pensez =)
Visiter le site web du posteur
Répondre en citant
Message [R] Ouvrir un fichier ou executer un fichier 
le problème est il réglé ?




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message [R] Ouvrir un fichier ou executer un fichier 
ouaip^^




______________________________________________________
Je suis en train de créer un petit site:
http://ludooindustries.p.ht/

N'hésitez pas à me dire ce que vous en pensez =)
Visiter le site web du posteur
Message [R] Ouvrir un fichier ou executer un fichier 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch