Форум: "Сети";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];
ВнизКопирование файлов по локальной сети Найти похожие ветки
← →
leonidus © (2005-03-18 09:42) [0]Мастера подскажите подалуйста, дело в том что мне нужно написать небольшую программку для резервного копирования базы данных с одного компа на другой соединенных локальной сетью. Папки из которой берется база (на первом компе) и в которую она копирутеся (на втором компе), расшарены, но эти машины находятся в разных группах сети. Если они в одной группе, то достаточно указать просто путь , например \\bibl\SharedDocs, но если компы в разных группах сети, такое не катит. Подскажите пожалуйста какие тут есть методы решения.
← →
leonidus © (2005-03-21 08:01) [1]Мастера, ну неужели ни кто не копировал файлы по сетке?
← →
Reindeer Moss Eater © (2005-03-21 09:35) [2]Подскажите пожалуйста какие тут есть методы решения.
GetLastError
← →
Zyb © (2005-03-21 10:23) [3]Напиши клиент серверное приложение, клиент отправляет файл, сервер принимает, там по моему без разницы в одной группе они у тебя находяться или нет
← →
Reindeer Moss Eater © (2005-03-21 10:24) [4]Разницы и так и этак нет никакой.
← →
leonidus © (2005-03-21 13:59) [5]Хотелось бы просто скопировать как обычный файл на одной машине, указал начальный каталог, конечный каталог и пошел копировать:
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 14:14) [6]А если вообще никаких групп нет?
Например надо скопировать с тома Novell NetWare на том на Unix?
Поэтому забудь навсегда про свои группы и их мнимое влияние на CopyFile.
← →
leonidus © (2005-03-22 07:54) [7]Че-то я не врубаюсь, а как тогда без групп и путей?
Но на данный момент у меня сеть Microsoft, там группы есть, подскажите пожалуйста как проблему решить в этом случае.
← →
Reindeer Moss Eater © (2005-03-22 08:38) [8]Windows.CopyFile("\\server1\share1\file1.txt","\\server2\share2\file1.txt",False);
И все.
И нет никаких групп.
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.013 c