Création d'une tâche planifiée via un programme delphi!

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 287 fois - Téléchargée 33 fois

Contenu du snippet

Au lieu d'aller sur Panneaux de configuration\Tâches planifiées pour créer ladite tâche, je vous propose un petit code qui permet d'en créer une rien qu'en cliquant sur un bouton de votre application!!
...bonne prog ;-)

Source / Exemple :


Procedure CreateBatFile(Cmd: String);
Const
BatName = 'TaskTmp.Bat' ;
Var
LS : TStrings;
FBAT : String;
Begin
LS := TStringList.Create;
 Try
 LS.Add(Cmd);
 LS.Add('Del '+BatName+' /q');
 FBAT := ExtractFilePath(ParamStr(0))+BatName;
 LS.SaveToFile(FBAT);
 ShellExecute(0,'Open',PChar(FBAT),Nil,Nil,SW_Hide);
 Finally
 LS.Free;
 End;
End;

Procedure CreateTask(TName,Login,Pass,AppliPath: String; T : TTime);
Var
Cmd : String;
Begin
Cmd:='schtasks /Create /tn "'+TName+'" /tr "\"'+AppliPath+'\" "';
Cmd:=Cmd+' /sc DAILY /st '+TimeToStr(T)+' /ru ';
Cmd:=Cmd+Login;
Cmd:=Cmd+' /rp "'+Pass+'"';
CreateBatFile(Cmd);
End;

procedure TForm1.Button1Click(Sender: TObject);
var
ps:TTime;
begin
 ps:=StrToTime('15:00:00');
 CreateTask('NAME','USER','PASSWORD','C:\Program Files\Microsoft Office\OFFICE11\WINWORD.exe',ps);
  //la tache planifiée créée étant WORD
end;

Conclusion :


j'attend vos critiques!!

A voir également

Ajouter un commentaire Commentaires
cs_pers Messages postés 38 Date d'inscription vendredi 2 mai 2003 Statut Membre Dernière intervention 9 décembre 2009
21 févr. 2007 à 15:16
"beaucoup de code trés bien conçus sont quasiment inutile (de mes sources, de florenth et de delphiprog par exemple). parfois, un code simple peut susciter bien plus d'interet qu'un monstre de technique"

J'adore ce post : rester humble et disponible... ca relève pas d'un clergé quelconque. Un propos humaniste c'est tout (et beaucoup)
f0xi Messages postés 4205 Date d'inscription samedi 16 octobre 2004 Statut Modérateur Dernière intervention 12 mars 2022 37
10 janv. 2007 à 20:49
Je penser pas qu'un tel code pourrait generer autant de dejection bucale de votre part.
alors plutot que de "punir" l'auteur en bloquant sa source, je vais tout simplement nettoyer vos reponses et ce sans faire de distinction aucunes.

je retiendrais malgrés tout des reponses trés pertinentes de la part de certains comme quoi on peu juger la construction d'un programme, sa syntaxe mais en aucuns cas l'auteur ou l'utilitée du code (OHDelphi).
beaucoup de code trés bien conçus sont quasiment inutile (de mes sources, de florenth et de delphiprog par exemple). parfois, un code simple peut susciter bien plus d'interet qu'un monstre de technique.

voila.

merci de reprendre un debat constructif et objectif sur cette source.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.