![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите как получить доступ к сетевому ресурсу [D7, Win2k, WinXP]
jorsand © (2006-11-22 10:20:00)Подскажите как получить доступ к сетевому ресурсу (каталогу) требующему аутентификацию, создать/удалить в нем файл.
Если можно поясните это без подключения ресурса как сетевого диска (без маппирования)
файлы создаю с использованием CreateFile.
можно ли использовать CreateFile после аутентификации, если да то как задать пользователя и пассword при CreateFile
jorsand (2006-11-29 16:43:00) [1]Использую след код для установки конекта
procedure TForm1.Button1Click(Sender: TObject);
Var
pAuInfo : PUseInfo2;
parm_err : PDWORD;
Res : NET_API_STATUS;
begin
GetMem(pAuInfo,sizeOf(_USE_INFO_2));
getMem(parm_err,sizeOf(DWORD));
//parm_err^:=sizeOf(_USE_INFO_1);
With pAuInfo^ do
begin
ui2_local:=nil;
ui2_remote:='\\192.168.40.20\Common';
ui2_password:='';
ui2_status:=0;
ui2_asg_type:=USE_WILDCARD;;
ui2_refcount:=0;
ui2_usecount:=0;
ui2_username:='Администратор';
ui2_domainname:='';
end;
Res:=NetUseAdd('', // he UNC name of the computer on which to execute this function.
2,
pAuInfo,
parm_err);
case Res of
NERR_Success : ShowMessage('ok');
ERROR_INVALID_PARAMETER : ShowMessage('неверные параметры');
else
ShowMessage('ошибка '+inttostr(res));
end;
end;
и получаю ERROR_SESSION_CREDENTIAL_CONFLICT
{The credentials supplied conflict with an existing set of credentials.}
Что бы это означало?! Пробовал менять пароль и usera не помогает :(
в хелпе написано про сервер. у меня в качестве сервака win2000 professional :), может в этом сабака?
Anatoly Podgoretsky (2006-11-29 15:30:00) [2]> jorsand (29.11.2006 15:23:03) [3]
Заголовки LanManager лежит уже много лет. Полезная вещь для тех кто работает с АПИ сетей.
jorsand (2006-11-29 15:23:00) [3]нашел в Jedi интересный файлик LM.pas
jorsand (2006-11-28 12:20:00) [4]спасибо, если получится раскажу
Дмитрий Белькевич (2006-11-28 03:40:00) [5]Может что-то из этого поможет:
http://msdn2.microsoft.com/en-gb/library/aa370240.aspx