Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2007.06.17;
Скачать: [xml.tar.bz2];

Вниз

Подскажите как получить доступ к сетевому ресурсу   Найти похожие ветки 

 
jorsand   (2006-11-22 10:20) [0]

Подскажите как получить доступ к сетевому ресурсу (каталогу) требующему аутентификацию, создать/удалить в нем файл.

Если можно поясните это без подключения ресурса как сетевого диска (без маппирования)
файлы создаю с использованием CreateFile.

можно ли использовать CreateFile после аутентификации, если да то как задать пользователя и пассword при CreateFile


 
Дмитрий Белькевич ©   (2006-11-28 03:40) [1]

Может что-то из этого поможет:

http://msdn2.microsoft.com/en-gb/library/aa370240.aspx


 
jorsand   (2006-11-28 12:20) [2]

спасибо, если получится раскажу


 
jorsand   (2006-11-29 15:23) [3]

нашел в Jedi интересный файлик LM.pas


 
Anatoly Podgoretsky ©   (2006-11-29 15:30) [4]

> jorsand  (29.11.2006 15:23:03)  [3]

Заголовки LanManager лежит уже много лет. Полезная вещь для тех кто работает с АПИ сетей.


 
jorsand   (2006-11-29 16:43) [5]

Использую след код для установки конекта


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 :), может в этом сабака?



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

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

Наверх





Память: 0.46 MB
Время: 0.042 c
10-1133792435
LORN
2005-12-05 17:20
2007.06.17
сохранить из olecontainer в ексел


9-1153360589
RobinBad
2006-07-20 05:56
2007.06.17
Установка Glscene


15-1179742734
db2admin
2007-05-21 14:18
2007.06.17
Что с иносми?


3-1175058426
MZ
2007-03-28 09:07
2007.06.17
как реализовать в Gride выборку отдельных записей CheckBox ом


15-1179778009
Ne-Ld
2007-05-22 00:06
2007.06.17
Мастаки, а подкиньте идею какой нить программы или вебсервиса.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский