Discussion :

[potili2]

je veux lancer un fichier batch, par delphi.
je suis allé voir la FAQ et j'ai essayé de transposer à mon pb, mais je n'arrive pas à trouver l'erreur...
mon fichier batch est:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

C:\actions françaises 2003\traitement_trade-expert\downloader_high.bat.bat

mon code selon la FAQ devient:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
ShellExecute(Application.Handle,
'open',
PChar(GetEnvironmentVariable('ComSpec')), 
'downloader_high.bat', 
'C:\actions françaises 2003\traitement_trade-expert',
 SW_SHOW);

j'ai dû mal comprendre qque chose...
merci pour votre aide
JP

[Cl@udius]

Salut

Essaye comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
ShellExecute(Application.Handle,
'open',
PChar(GetEnvironmentVariable('ComSpec')), 
'C:\actions françaises 2003\traitement_trade-expert\downloader_high.bat', 
'C:\actions françaises 2003\traitement_trade-expert',
 SW_SHOW);

@+

[potili2]

merci pour cette réponse rapide, mais ça ne fonctionne toujours pas.
ça me place dnas le bon répertoire, mais c'est tout.
et pourtant, si je clique sur le fichier batch, ça fonctionne.

[Cl@udius]

Ah oui, j'ai oublié le paramètre /K de cmd

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
ShellExecute(Application.Handle,
  'open',
  PChar(GetEnvironmentVariable('ComSpec')), 
  '/K "C:\actions françaises 2003\traitement_trade-expert\downloader_high.bat"', 
  '"C:\actions françaises 2003\traitement_trade-expert"',
 SW_SHOW);

J'ai ajouté des guillemets (") à tes chemins.

[edit]
Substitue /K par /C pour fermer la fenêtre DOS après l'exécution du batch si besoin est.
[/edit]

@+ Claudius

[potili2]

me restent deux choses à faire:
a) dire "merci"
b) indiquer "résolu"
JP