расшаренные папки

← →
Sash © (2005-09-29 07:28) [0]

Здравствуйте! как то нашел здесь пример с помощью которого можно копировать с расшаренных ресурсов нужный файл:

FillChar(frombuf,Sizeof(frombuf),0);
FillChar(tobuf,Sizeof(tobuf),0);
StrPCopy(frombuf,"\\"+ipnumber+"\roplog\zoc"+DataEdit.Text+".doc");
StrPCopy(tobuf,"e:\5ESS");
with OpStruc do
begin
Wnd:=Handle;
wFunc:=FO_COPY;
pFrom:=@frombuf;
pTo:=@tobuf;
fFlags:=FOF_NOCONFIRMATION or FOF_RENAMEONCOLLISION;
fAnyOperationsAborted:=False;
hNameMappings:=nil;
lpszProgressTitle:=nil;
end;
ShFileOperation(OpStruc);

расшаренная папка открыта на чтение без пароля. Сейчас возникла потребность поставить пароль на чтение. Скажите пожалуйста, есть ли возможность копировать файл? т.е. что надо добавить в код чтобы программка как то подставляла пароль и копировала нужный файл? Заранее благодарен!

← →
BiN © (2005-09-29 09:57) [1]

The WNetAddConnection2 function makes a connection to a network resource. The function can redirect a local device to the network resource. (С) MSDN

← →
Sash © (2005-09-29 11:04) [2]

я не использую никаких компонентов, а WNetAddConnection2 как я понял это компонент.
можно поконкретней пожалуйста

← →
BiN © (2005-09-29 11:07) [3]

Sash © (29.09.05 11:04) [2]

я не использую никаких компонентов, а WNetAddConnection2 как я понял это компонент.

неправильно понял. это функция.

можно поконкретней пожалуйста

msdn.com - там есть поиск

СПАСИБО

почитал и разобрался, спасибо BiN!

расшаренные папки Найти похожие ветки