Здравствуйте! DNS-325. Пытаюсь сделать вот так: Procedure AddDisk; Var nr: NETRESOURCE; lpLogin, lpPassword:PChar; ConResult:DWord; Begin ZeroMemory (@nr, SizeOf (nr)); lpLogin:='Sin'; lpPassword:='n172mt'; nr.dwType := RESOURCEType_DISK; nr.lpLocalName := 'M:'; nr.lpRemoteName := '\\LANStorage\Video_Record'; nr.lpProvider := Nil; ConResult := WNetAddConnection2 (nr,lpLogin, lpPassword, CONNECT_UPDATE_PROFILE); If ConResult <> NO_ERROR Then ShowMessage (IntToStr(ConResult)); End;
Выдает ошибку 1326. Это отказ авторизации, при этом Логин и пароль точно правильные. Что я делаю не так?
|