подсоединение к файл серверу

← →
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 );
//====================================

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

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

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