Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Копирование файлов по локальной сети [D6, WinXP]

leonidus © (2005-03-18 09:42:00)
Мастера подскажите подалуйста, дело в том что мне нужно написать небольшую программку для резервного копирования базы данных с одного компа на другой соединенных локальной сетью. Папки из которой берется база (на первом компе) и в которую она копирутеся (на втором компе), расшарены, но эти машины находятся в разных группах сети. Если они в одной группе, то достаточно указать просто путь , например \\bibl\SharedDocs, но если компы в разных группах сети, такое не катит. Подскажите пожалуйста какие тут есть методы решения.

Reindeer Moss Eater (2005-03-22 08:38:00) [1]
Windows.CopyFile('\\server1\share1\file1.txt','\\server2\share2\file1.txt',False);

И все.
И нет никаких групп.

leonidus (2005-03-22 07:54:00) [2]
Че-то я не врубаюсь, а как тогда без групп и путей?
Но на данный момент у меня сеть Microsoft, там группы есть, подскажите пожалуйста как проблему решить в этом случае.

Reindeer Moss Eater (2005-03-21 14:14:00) [3]
А если вообще никаких групп нет?
Например надо скопировать с тома Novell NetWare на том на Unix?

Поэтому забудь навсегда про свои группы и их мнимое влияние на CopyFile.

leonidus (2005-03-21 13:59:00) [4]
Хотелось бы просто скопировать как обычный файл на одной машине, указал начальный каталог, конечный каталог и пошел копировать:

procedure FileCopy(const FromFile, ToFile: string);

var
FromF, ToF: file;
NumRead, NumWritten: Word;
Buf: array[1..2048] of Char;
begin

AssignFile(FromF, FromFile);
Reset(FromF, 1); { Размер записи = 1 }
AssignFile(ToF, ToFile); { Открываем выходной файл }
Rewrite(ToF, 1); { Размер записи = 1 }
repeat
BlockRead(FromF, Buf, SizeOf(Buf), NumRead);
BlockWrite(ToF, Buf, NumRead, NumWritten);
until (NumRead = 0) or (NumWritten <> NumRead);
ClloseFile(FromF);
CloseFile(ToF);
end;

а как быть если компы в разных группах?
Сеть Microsoft, один комп Group1\Komp1 а другой Group2\Komp1 как тут корректно вызвать процедуру procedure FileCopy ?

Reindeer Moss Eater (2005-03-21 10:24:00) [5]
Разницы и так и этак нет никакой.

Zyb (2005-03-21 10:23:00) [6]
Напиши клиент серверное приложение, клиент отправляет файл, сервер принимает, там по моему без разницы в одной группе они у тебя находяться или нет

Reindeer Moss Eater (2005-03-21 09:35:00) [7]
Подскажите пожалуйста какие тут есть методы решения.
GetLastError

leonidus (2005-03-21 08:01:00) [8]
Мастера, ну неужели ни кто не копировал файлы по сетке?

Наверх

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