Форум: "Система";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];

Вниз

Запуск программы на удаленной машине с правами администратора   Найти похожие ветки 

← →
Voland_s   (2002-06-20 17:48) [0]

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

---

← →
ZZ   (2002-06-20 17:51) [1]

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

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

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

---

← →
ZZ   (2002-06-20 17:56) [2]

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:58) [3]

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

---

← →
Voland_s   (2002-06-21 12:41) [4]

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

---

← →
ZZ   (2002-06-21 16:45) [5]

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

---

Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.007 c