commande DOS "universelle" (98, XP, Vista)Résolu

Question

bonjour !
j'aimerai savoir si il y a une possibilité d'éxécuter une commande DOS qui marche sur tous les Windows (98, XP, Vista) car mon problème est que l'invite de commande est passée de command à cmd (de 98 à XP) et donc mon petit programme ne marchera pas sous tous les windows et tant qu'à faire autant n'avoir qu'une version.

merci. 








-----------------------------------------



Jack NUMBER

cs_rt15 · Accepted Answer

Bah simplement quelque chose comme ça :
var
  nSize: DWORD;
  val: String;
begin
  nSize:= 0;
  nSize:= GetEnvironmentVariable('ComSpec', nil, nSize);
  SetLength(val, nSize - 1);
  GetEnvironmentVariable('ComSpec', PChar(val), nSize);
  ShellExecute(handle,'open',val,'/c DEL C:\aa.txt','',SW_Hide);
end;


Le quatrième argument, c'est les paramètres passés à l'appli, donc tu demandais le lancement de deux invites.

Francky23012301 · Answer

Salut,

1) Le Dos n'existe plus sous NT

2) l'invite de commande est passée de command à cmd : Oui et ??????

>DEMARRER
>>EXECUTER
>TAPER "COMMAND"
>OK
Le Shell se lance

>DEMARRER

>>EXECUTER

>TAPER "CMD"

>OK

Le Shell se lance

Avant de poser ta question tu aurais pu vérifier quand meme

cs_JackNUMBER · Answer

salut !
ha mais ça je le sais 
c'est juste que dans un code comme celui là: 
ShellExecute(handle,'open','command.com','command.com/c DEL C:\*.bmp','',SW_Hide);

je suis obligé de faire une version comme celle-ci pour XP:
ShellExecute(handle,'open','cmd.exe','cmd.exe/c DEL C:\*.bmp','',SW_Hide);

donc je suis obligé de doubler le code, c'est pour cela je cherche un moyen pour palier à ce problème, ne commande 'universelle'.
Sinon pourquoi pas un "détécteur" de version de Windows qui mettra 'cmd.exe' ou 'command.com' dans une variable et cette variable serait appelée dans la commande... c'est tiré par les cheveux... 

et je sais pas mettre une valeur dans une variable :/









-----------------------------------------



Jack NUMBER

cs_JackNUMBER · Answer

c'était un script comme ça, un script d'exemple que j'ai récupéré.
bref.
merci pour vos explications !! 







-----------------------------------------



Jack NUMBER

Francky23012301 · Answer

Tu dis une grosse betise : Testé sous XP Sp2

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(handle,'open','command.com','command.com/c DEL C:\aa.txt','',SW_Hide);
end;

Fichier "aa.txt" parfaitement supprimé. Lis les réponses que l'on te donne et fais un minimum de tests avant de poser une question : tu avais tou il y avait qu'a tester

cs_rt15 · Answer

Salut,


Jette un coup d'oeil du côté de la variable d'environnement comspec.


Je crois qu'elle contient toujours l'invite privilégiée de l'OS, que ce soit cmd.exe ou command.com.

cs_JackNUMBER · Answer

hello !
merci Francky23012301 pour ta réponse chaleureuse !
je n'ai effectivement pas fait le test mais c'était une supposition... 

rt15 > où puis-je trouver cette variable ??








merci !



-----------------------------------------



Jack NUMBER

cs_rt15 · Answer

Un tuto Delphi sur les variables d'environnement.




En virant les sécurités et la "généricité", ça donnerait quelque chose comme ça :
var
  nSize: DWORD;
  val: String;
begin
  nSize:= 0;
  nSize:= GetEnvironmentVariable('ComSpec', nil, nSize);
  SetLength(val, nSize - 1);
  GetEnvironmentVariable('ComSpec', PChar(val), nSize);
  ShowMessage(val);
end;

Pour les voir sous Windows, clique droit sur le poste de travail,
puis "propriété", puis quelque chose comme onglet "avancé", et
finalement "variables d'environnement".

Un détail, m'enfin je précise : sous XP si on lance cmd, ComSpec
sera cmd, mais si on lance command.com, ComSpec sera command.com (Les
variables d'environnement sont propres à un processus, mais au
démarrage du processus, elles sont fournies par le système). Pour une
appli quelconque, ce sera cmd.

cs_JackNUMBER · Answer

merci rt15
mais maintenant que je sais quel est le processus et où il est je ne peux pas utiliser le contenu de val
... imaginons simplement que windows (donc system32) soit sur le disque E: je ne peux pas prévoir toutes les éventualités :/
je vais resté sur command.com (surtout si il fonctionne sou sXP et Vista :P).

merci

ps: je découvre de nouvelle choses sur windows, merci !! ^^








-----------------------------------------



Jack NUMBER

cs_rt15 · Answer

Dans le cas ou Windows est sur E:\, ComSpec pointe certainement sur E:\... aussi.

C'est tout l'intérêt des variables d'environnement.

cs_JackNUMBER · Answer

je l'ai bien compris mais comment l'intégrer dans mon script de départ ??



-----------------------------------------



Jack NUMBER

cs_JackNUMBER · Answer

super !
merci à tous !!! 







-----------------------------------------



Jack NUMBER

Commande DOS "universelle" (98, XP, Vista)

12 réponses

Votre réponse

Discussions similaires