Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запуск программы на удаленной машине с правами администратора [D5, NT4, Win2k]


Voland_s ©   (2002-06-20 17:48:00) 

Необходимо запустить на 2000 либо на NT 4.0 программу на удаленной машине без использования технологии клиент сервер
я могу это сделать через администрирование, службы, запуск, а через Делфи ... ????


ZZ   (2002-06-21 16:45:00) [1]

А если
... NetScheduleJobGetInfo(...,var PointerToBuffer :AT_INFO);


Voland_s   (2002-06-21 12:41:00) [2]

А каким образом работать с NetScheduleJobGetInfo("\\Remote",1,ai); я не знаю как описать ai я пробовал и как AT_INFO помогите примером плз


ZZ   (2002-06-20 17:58:00) [3]

Время на удаленном компе получают
NET_API_STATUS NetRemoteTOD(
LPCWSTR UncServerName,
LPBYTE *BufferPtr
);


ZZ   (2002-06-20 17:56:00) [4]

type
AT_INFO = record
JobTime : DWORD;
DaysOfMonth : DWORD;
DaysOfWeek :UCHAR;
Flags :UCHAR;
Command : PWideChar;
end;

function NetScheduleJobAdd(Servername:PWideChar;Buffer : Pointer;var JobId : Cardinal):LongInt;stdcall;external "netapi32.dll";

var
ai : AT_INFO ;
JobID : Cardinal;
begin
ai.JobTime = текущ время на том компе в миллисекундах +60000;
ai.Command="C;\file.exe";

NetScheduleJobAdd("\\server",@ai,JobID);


ZZ   (2002-06-20 17:51:00) [5]

NET_API_STATUS NetScheduleJobAdd(
LPCWSTR Servername,
LPBYTE Buffer,
LPDWORD JobId
);

Описание в MSDN
файлы ищи на http://delphi-jedi.org/или переведи сам.

я могу это сделать через администрирование, службы, запуск,
Через администр/службы запускаются не ПРОГРАММЫ а СЛУЖБЫ(сервисы)!!!


Наверх

Титульная страница Поиск, карта сайта Написать письмо