Мапирование сетевого диска [D5, Win2k]
tiam © (2003-03-14 09:00:00)
Как программно мапировать сетевой диск, а в случае обрыва
связи с удаленным компом, проверить подключение, если
восстановлено, то снова подключить сетевой диск.
Спасибо
Lord Warlock (2003-03-14 09:19:00) [1]
Мапировать можно примерно так:
const DiskT: array [0..MAX_PATH] of Char="\\Server\Path";
var NetRes: NETRESOURCE;
begin
NetRes.dwType:=RESOURCETYPE_DISK;
NetRes.lpRemoteName:=DiskT;
NetRes.lpLocalName:="T:";
if WNetAddConnection2(NetRes,nil,nil,CONNECT_UPDATE_PROFILE)
in [NO_ERROR,ERROR_ALREADY_ASSIGNED] then
Writeln("Net Drive "T" Assigned")
else
Writeln("ERROR! Can`t assign network drive "T"");
{У меня консольный вывод, отсюди и writeln}
end
а при обрыве связи сетевой диск не отключается, он просто
недоступен :)
Наверх 
ЧАТ |
Орешник |
|
