Помогите с программой копирования файлов

[nanocrew]

Добрый день.
1. помогите написать простенькую программу.
Смысл таков Например:
В папке с:\test\ находяться файлы test1.exe и test2.txt.

2. Хотелось бы что бы программа просто копировала файлы находящиеся в с:\test\ в папку c:\test2\.

И если не очень сложная программа. То если возможность сделать так чтобы эти файлы отправлять на ftp или на mail.

Если напряжно вторым можно пренебречь, но все же.
Спасибо!!!

[Stilet]

То если возможность сделать так чтобы эти файлы отправлять на ftp или на mail.

Обязательно в Паскале?

[nanocrew]

А на каком языке? delphi? c?

[nanocrew]

Просто так сказать учусь на паскале. Если напишешь в Си, то врят ли мне будет что то понятно. А так можешь на любом

Интересна сама реализация. ! На паскале может что то пойму

[Stilet]

Я бы написал это в BAT файле, т.е. командами консоли:

xcopy с:\test\ с:\test2 /E
pause

Это наболее простой способ в windows.
по поводу Делфи ищи поиском по слову SHFileOperation - это уже обсуждалось...
Ну а на паскале классическом это писать муторно...

[nanocrew]

Сообщение от Stilet

Я бы написал это в BAT файле, т.е. командами консоли:

xcopy с:\test\ с:\test2 /E
pause

Это наболее простой способ в windows.
по поводу Делфи ищи поиском по слову SHFileOperation - это уже обсуждалось...
Ну а на паскале классическом это писать муторно...

Спасибо большое. Посмотри еще в теме там вопросик


А вот так:
вот код программы которая копирует данные из файла input.txt d res.txt
Можно ли модифицировать так что бы файл res.txt отправлялся на mail???
Либо ФТП? Тоже запарно?

var
  str: String;
  f1,f2: text;
begin
  assign(f1,'input.txt');
  assign(f2,'res.txt');
  reset(f1);
  reset(f2);
  while not EOF(f1) do
    begin
      readln(f1,str);
      writeln(f2,str);
    end;

  close(f2);
  close(f1);
end.

Спасибо !!!

[Stilet]

Можно ли модифицировать так что бы файл res.txt отправлялся на mail???
Либо ФТП? Тоже запарно?

Не то чтобы запарно, но можно опять таки командами консоли, я просто не помню их
Отправка на мыло вроде команда mailto...