Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 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
6-1108481093
НовичокОК
2005-02-15 18:24
2005.06.06
Как узнать имя пользователя (компа) занявшего ресурс?


14-1116687408
syte_ser78
2005-05-21 18:56
2005.06.06
Оцените программу


14-1116592324
pavel_guzhanov
2005-05-20 16:32
2005.06.06
Как перевести пикселы в миллиметры


14-1116512421
zamik
2005-05-19 18:20
2005.06.06
Запуск программы


4-1113847991
_Seldon_
2005-04-18 22:13
2005.06.06
Скопировать файл в буфер?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский