Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.08.21;
Скачать: 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 вся ветка

Текущий архив: 2011.08.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
2-1297704242
Criptonik
2011-02-14 20:24
2011.08.21
процесс копирование файлов


4-1249641864
Гость
2009-08-07 14:44
2011.08.21
Получение текста ошибки при вызове LoadLibrary в сервисе


15-1303911755
OW
2011-04-27 17:42
2011.08.21
миллион строк в Excel 2007. Правда?


2-1304806453
Gu
2011-05-08 02:14
2011.08.21
Поиск файла в путях переменной окружения Path


2-1305003614
FIL-23
2011-05-10 09:00
2011.08.21
Вызов формы в delphi xe