Кто нибудь подскажет как передать данные в winexec чтобы выполнилось действие.
Есть программа делает каждый час бекап файла, но не получается добавить ее в планировщик задач через cmd.
Код:
1 2 3 4 5 6 7 8 | procedure TForm1 . Button1Click(Sender: TObject);
var
buf: String ;
begin
buf:= 'cmd /c "Schtasks /Create /sc minute /mo 60 /tn "Backup_File" /tr "' +GetWin( '%APPDATA%' )+ '\FileZilla\Backup_File\' + ' Backup . exe""';
WinExec( PAnsiChar (buf), Sw_Show);
ShellExecute(Handle, nil , PChar (buf), nil , nil , Sw_Show);
end ;
|
главное если просто выполнить команду
Код:
1 | 'cmd /c "Schtasks /Create /sc minute /mo 60 /tn "Backup_File" /tr "' +GetWin( '%APPDATA%' )+ '\FileZilla\Backup_File\' + ' Backup . exe""'
|
через Win+R -> "Выполнить" программа добавляется в планировщик задач без проблем, а программно не хочет!