Скачать: CL | DM;

Доступ к папке с паролем   Найти похожие ветки 

← →
FZ*XupypG ©   (2003-04-20 08:53) [0]

Суть.
В локальной сети имеется расшареный ресурс с паролем на запись.
Как реализовать запись в эту папку, скажем, текста (memo1.lines.savetofile...). Пароль, конечно, есть.

---

← →
dzmitry_   (2003-04-20 12:55) [1]

procedure OpenShare(const Computer, User, Password: string);
// адчынiць шару, калi яна патрабуе пароль i iмя карыстальнiка
var
NetRes: TNetResource;
begin
FillChar(NetRes,SizeOf(NetRes),0);
NetRes.dwType:=RESOURCETYPE_ANY;
NetRes.lpLocalName:=nil;
NetRes.lpProvider:="";
NetRes.lpRemoteName:=PChar(Computer);
WNetAddConnection2(NetRes,PChar(Password),PChar(User),CONNECT_UPDATE_PROFILE);
end;

---

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

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.029 c