Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите разобраться с сетевым подключением. [D6, XP]


Andrey K ©   (2016-08-22 08:58:00) 

В локальной сети подключаю устройство:
var
 nr: TNetResource;
 err: integer;
   begin
     nr.lpLocalName:= 'Nc2';
     //nr.lpLocalName:= 'NC2';
     nr.lpProvider := nil;
     nr.dwType := RESOURCETYPE_DISK;
     nr.lpRemoteName:= PChar(\\Nc1\VVV);
err := WNetAddConnection2(nr,'b','n',0);
ShowMessage(SysErrorMessage(err));
   end;
Выдаёт сообщение "Указано неверное имя устройства"
На устройстве имя показывает NC2


Andrey K   (2016-08-22 11:23:00) [1]

Супер. Большое спасибо. Заработало.


Rouse_   (2016-08-22 10:33:00) [2]

lpLocalName - имя диска укажи свободное, к примеру:

nr.lpLocalName:= 'Z:';


Наверх

Титульная страница Поиск, карта сайта Написать письмо