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

Вниз

Пожалуста! помогите с коннектом!   Найти похожие ветки 

← →
alexvan ©   (2003-02-26 20:58) [0]

Уважаемые мастера! Прабла в следующем. Надо создать сетевой диск. Папка на машине в другой рабочей группе.
В пределах своей группы всё нормально. Диск создаётся. Прописываю путь к другой - ни фига.
Код следующий

procedure TForm1.Button1Click(Sender: TObject);
var
ntr : NETRESOURCE;
code : DWORD;
pw, nm, locname, remname : PChar;

begin
pw:=StrAlloc(64*SIZEOF(Char));
nm:=StrAlloc(64*SIZEOF(Char));
locname:=StrAlloc(64*SIZEOF(Char));
remname:=StrAlloc(64*SIZEOF(Char));

memo1.Lines.LoadFromFile("setup.ini"); {Это просто для контроля}
StrPCopy(locname, Memo1.Lines[2]);
StrPCopy(remname, Memo1.Lines[3]);
StrPCopy(pw, Memo1.Lines[4]);
StrPCopy(nm, Memo1.Lines[5]);

with ntr do
begin
dwType := RESOURCETYPE_DISK;
lpLocalName := locname;
lpRemoteName := remname;
lpProvider := nil;
end;

code := WNetAddConnection2(ntr, pw, nm, 0);
if NO_ERROR = code then
begin
MessageBeep(MB_OK);
end;
StrDispose(remname);
StrDispose(locname);
StrDispose(pw);
StrDispose(nm);
end;
Некий файл ini выглядит так:

[NET]
RESOURCETYPE_DISK
Z:
в мою рабочую группу //комп/папка
пароль
ник
================
Терзают смутные сомнения: может к другому компу функция в переменной lpRemoteName путь не понимает?

---

← →
alexvan ©   (2003-02-27 06:58) [1]

???

---

← →
alexvan ©   (2003-02-27 19:57) [2]

Ну неужели никто не знает???

---

← →
ole ©   (2003-02-28 05:31) [3]

Скорее всего пароль и ник, используемый для подключения к другой машине - неверен. Или там папка не расшарена. А путь должна понимать.

---

← →
alexvan ©   (2003-02-28 08:32) [4]

Так самое прикольное, что с этим паролем и ником в эту папку через сетевое окружение попадаю без каких-либо проблем, и более: ник и пароль прописан в домене

---

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

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

Наверх

Память: 0.47 MB
Время: 0.02 c