Копирование программы

[SL1CK]

Как сделать чтоб программа копировала сама себя, допустим в C:\Windows ??

[Sazary]

И зачем это ей копироваться в системную папку? А не вирус ли пишите?

Вот вам пример:

uses dos;
var
f: text;
begin
assign(f,'tmpfile.bat');
rewrite(f);
writeln(f,'copy '+paramstr(0)+' d:\newfile.exe');
writeln(f,'del tmpfile.bat');
close(f);
exec('tmpfile.bat','');
end.

А можно еще короче:

uses dos;
begin
exec('c:\windows\system32\cmd.exe',' /c copy '+paramstr(0)+' d:\newfile.exe');
end.

[SL1CK]

Спасибо, да что то наподобии вируса)

[SL1CK]

помоему exec неработает..
делал по первому способу создаеться бат файл и все, но он ведь должен запуститься, чтобы выполнить копирование программы, но ничего не происходит

[PovAttack]

А пробовал через CopyFile?

[Sazary]

Тогда вот так попробуйте:

exec('C:\WINDOWS\system32\cmd.exe',' /c tmpfile.bat');

у меня работает и так, и так.

А вообще, если пишете "что то наподобии вируса", то желания принимать в этом участие у меня нет.

[SL1CK]

ясно, спасибо

[Serge_Bliznykov]

а я ещё добавлю. что,
1) если у пользователя нет админских прав - то он в эту директорию файл не запишет НЕ ПРИ КАКИХ УСЛОВИЯХ!
2) в Висте эти папки защищены даже от пользователя с правами админа. Там надо запускать программу от имени Администратора
3) записать свой EXE файлик в system32 можно (ну если пройти пункты 1 и 2), но если попытаться обеспечить его загрузку - то при прописывании программки в автостарт сработает любой нормальный антивирус.

так что, SL1CK кончайте дрянью заниматься. Займитесь чем-нибудь полезным!!

[OCTAGRAM]

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

Тогда вот так попробуйте:

exec('C:\WINDOWS\system32\cmd.exe',' /c tmpfile.bat');

у меня работает и так, и так.

По–хорошему, расположение интерпретатора командной строки надо брать из COMSPEC.

[SL1CK]

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

а я ещё добавлю. что,
1) если у пользователя нет админских прав - то он в эту директорию файл не запишет НЕ ПРИ КАКИХ УСЛОВИЯХ!
2) в Висте эти папки защищены даже от пользователя с правами админа. Там надо запускать программу от имени Администратора
3) записать свой EXE файлик в system32 можно (ну если пройти пункты 1 и 2), но если попытаться обеспечить его загрузку - то при прописывании программки в автостарт сработает любой нормальный антивирус.

так что, SL1CK кончайте дрянью заниматься. Займитесь чем-нибудь полезным!!

да все там сработает, программе не требуються права..
и плюс я неочень разбераюсь в программировании, так что у меня программа самая обычная... все что она делает при запуске создает txt файлик в своей директории и после копируеться в разные места под другим именем...

и чтоб сделать что то полезное нужно больше знаний...