Вниз
Скачать: CL | DM;

подсоединение к файл серверу   Найти похожие ветки 

 
kkk3632 ©   (2009-08-10 14:22) [0]

Как из своей программы присоединиться к файл серверу (Windows 2003) под другим именем, для копирования файлов на сервер и с сервера?


 
Leonid Troyanovsky ©   (2009-08-10 15:02) [1]


> kkk3632 ©   (10.08.09 14:22)  

msdn: WNetAddConnection2, WNetCancelConnection2.

--
Regards, LVT.


 
kkk3632 ©   (2009-08-10 15:48) [2]

//====================================
 Это ответ ОС

Multiple connections to a server or shared resource by the same user, using more than one user name, are not allowed. Disconnect all previous connections to the server or shared resource and try again.

ниже то что я у нее просил.

//====================================
 lpszUsername, lpszDomain, lpszPassword, lpLocalName, lpRemoteName: array[Byte] of Char;

 procedure StringToStr (astr: String; aBuf: PChar);
 var i: Integer;
 Begin

   For i := 0 To Length(aStr) - 1 Do Begin
     aBuf [i] := aStr[i+1];
   End;
   aBuf [Length(aStr)] := Chr (0);
 End;
Begin
 StringToStr ("SQLSUAdmin", lpszUsername);
 StringToStr ("EMSS", lpszDomain);
 StringToStr ("*******", lpszPassword);

 StringToStr ("H:", lpLocalName);
 StringToStr ("\\Backserv\OKIS", lpRemoteName);

 lpNetResource.dwScope       := 0;
 lpNetResource.dwDisplayType := 0;
 lpNetResource.dwUsage       := 0;
 lpNetResource.dwType        := RESOURCETYPE_ANY;
 lpNetResource.lpLocalName   := lpLocalName;
 lpNetResource.lpRemoteName  := lpRemoteName;
 lpNetResource.lpProvider    := nil;
 mLastError := WNetAddConnection2 (lpNetResource, lpszPassword, lpszUserName, CONNECT_UPDATE_PROFILE );
//====================================


 
Медвежонок Пятачок ©   (2009-08-10 18:09) [3]

Он же тебе человеческим голосом говорит

Disconnect all previous connections to the server or shared resource and try again.



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

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



Память: 0.45 MB
Время: 0.004 c
2-1305287803
Fr
2011-05-13 15:56
2011.08.21
TDrawGrid и PNG


1-1263401544
Nik
2010-01-13 19:52
2011.08.21
создание плагинов


3-1262954585
serko
2010-01-08 15:43
2011.08.21
Обработка ошибок


15-1303982784
Дмитрий Тимохов
2011-04-28 13:26
2011.08.21
Как отключить в BPL добавление VersionInfo?


2-1305104750
Feamor
2011-05-11 13:05
2011.08.21
Ищу совета по функции AssignFile и ее работы в сети




   Наверх