Executer une commande dos + script

Signaler
Messages postés
91
Date d'inscription
mercredi 14 mars 2007
Statut
Membre
Dernière intervention
31 mai 2009
-
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
-
Voila enfaite j'aimerais savoir comment avec Delphi 7 je peux ouvrir dos et faire cette commande :

ipconfig /flushdns

ipconfig /release

ipconfig /renew

Effacer les cookies.

En appuyant sur un bouton par exemple .

Je pensais a enregistrer le script en .bat et le faire executer avec Delphi en Appuyant sur un bouton.
Mais je ne sais pas trop comment procéder :s

Merci beaucoup

3 réponses

Messages postés
91
Date d'inscription
mercredi 14 mars 2007
Statut
Membre
Dernière intervention
31 mai 2009

Ok et ca peut marcher avec un fichier .bat ?

Merci encore
Messages postés
3819
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
2 novembre 2020
34
oui
commande DOS directe
ou fichier BAT
ou fichier CMD
etc.
etc.

 
@+
Cirec

<hr siz="" />
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
34
function ShellCmd(const Command, Parameters: string; const NoActive: boolean = true): integer;
var
  PRM : string;
begin
  if NoActive then
    PRM := '/c '+Command+' '+Parameters;
  else
    PRM := '/k '+Command+' '+Parameters;
  shellexecute(0, 'open', 'cmd.exe', PChar(PRM), nil,

SW_SHOWNORMAL);
end;




ShellCmd('ipconfig', '/release');
-> execute : cmd.exe /c ipconfig /release

<hr size ="2" width="100%" />