Accueil > > > CRÉATION D'UNE TÂCHE PLANIFIÉE VIA UN PROGRAMME DELPHI!
 CRÉATION D'UNE TÂCHE PLANIFIÉE VIA UN PROGRAMME DELPHI!
 Information sur la source
 Description
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
-
- 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;
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!!
 Sources de la même categorie
 Commentaires et avis
|
Derniers Blogs
 PARUTION DE MON LIVRE SUR WPF 4PARUTION DE MON LIVRE SUR WPF 4 par odewit
La 2e édition de mon livre sur WPF sort aujourd'hui en version numérique et lundi en version papier :-)
L'ouvrage présente de façon approfondie les fonctionnalités de WPF 4 : graphisme 2D et 3D, animation, multimédia, interfaces utilisateur, databind...
Cliquez pour lire la suite de l'article par odewit EDM : COMMENT UTILISER L'HORIZONTAL ENTITY SPLITTINGEDM : COMMENT UTILISER L'HORIZONTAL ENTITY SPLITTING par Matthieu MEZIL
Une des raisons pour lesquelles j'adore l'Entity Framework est la puissance de son mapping. Beaucoup de développeurs pour ne pas dire la plus part n'en n'ont pas conscience. Pour rappel, j'ai réalisé des videos (en anglais) sur le mapping . Certains scena...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WP7DEV][REACTIVE] RENDRE LES REACTIVE EXTENSIONS PLUS STABLES[WP7DEV][REACTIVE] RENDRE LES REACTIVE EXTENSIONS PLUS STABLES par jay
Lorsque l'on développe des applications .NET, les exceptions non gérées dans des threads ont le désagréable effet de terminer le processus courant.
Dans l'exemple suivant.......(read more) ...
Cliquez pour lire la suite de l'article par jay WINDBG / SOS / PSSCOR2 : FAILED TO LOAD DATA ACCESS DLL (MSCORDACWKS)WINDBG / SOS / PSSCOR2 : FAILED TO LOAD DATA ACCESS DLL (MSCORDACWKS) par coq
Ceux d'entre nous qui analysent des dumps d'applications .NET (notamment ceux créés via WER après un crash) en dehors de l'environnement initial ont probablement tous été confrontés au moins une fois au message suivant, à la saisie d'une commande SOS ...
Cliquez pour lire la suite de l'article par coq
Forum
 RE : BDD ACCESSRE : BDD ACCESS par MohInfo
Cliquez pour lire la suite par MohInfo
Logiciels
 Microsoft Office (2010)MICROSOFT OFFICE (2010)Microsoft Office 2010 offre de nouveaux moyens flexibles et puissants pour optimiser votre travai... Cliquez pour télécharger Microsoft Office SeaMonkey (2.0.7)SEAMONKEY (2.0.7)Le projet SeaMonkey est issu d'un effort communautaire pour developper une application tout en un... Cliquez pour télécharger SeaMonkey Safari (5.0.2)SAFARI (5.0.2)Le navigateur d'Apple a lui aussi été mis à jour, aussi bien dans sa mouture Windows que celle po... Cliquez pour télécharger Safari Mozilla FireFox (4.0 béta 5)MOZILLA FIREFOX (4.0 BéTA 5)Firefox 4.0 béta 5
L'une des nouveautés visibles les plus attendues réside sans doute dans l'a... Cliquez pour télécharger Mozilla FireFox Mozilla Firefox (3.6.9)MOZILLA FIREFOX (3.6.9)Firefox 3.6.9 corrige les problèmes suivants :
* Introduced support for the X-FRAME-OPTION... Cliquez pour télécharger Mozilla Firefox
|