autostart script für xp

hallo leute,
ich suche einen script der auf klick ein bestimmtes programm in die autostart liste von windows xp einfügt

mfg h4xx0r1337
 
Code:
#!/usr/bin/env perl
use strict;
my $programm = "programm.exe";
my @dau = qw(cp $programm c:\dokume~1\admini~1\startm~1\autostart);
system join(' ', @dau);
 
Ich würd denken in win ist der name nicht egal, das #! interessiert win glaub nicht. ich würds mit endung .pl speichern.

alternative wär den ganzen spaß als batch zu schreiben, dann läufts auch ohne active perl.
 
Auszug aus einem in VBS geschriebenen Wurm:

das_war_mal_ein_wurm.vbs
Code:
Set rg = createobject("WScript.Shell")
rg.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\" & rgname & "",winpath&"\SYSTEM32\" & newname

natürlich sind in dem kompletten Script noch die Variablen rgname und newname definiert, was hier in dem Schnipsel nicht der Fall ist - aber du musst den Pfad ja eh durch deine eigenen Angaben ändern...
 
und hier das ganze in C++ (weis nicht ob das nicht auch leichter gehen würde)
braucht windows.h


Code:
	HKEY hkey;
	HKEY KEY = HKEY_LOCAL_MACHINE;

	char place[100]= {"Software\\Microsoft\\Windows\\CurrentVersion\\Run"};
	char name[100]= {"Autostart"};
	char value[100]= {"Pfad zur datei"};

	RegOpenKeyEx(KEY,(LPCTSTR)place,0, KEY_ALL_ACCESS,&hkey);
	RegSetValueEx(hkey, name, 0, REG_SZ, (BYTE *)value, strlen(value));
	RegCloseKey(hkey);
 
Original von beavisbee
Auszug aus einem in VBS geschriebenen Wurm:

das_war_mal_ein_wurm.vbs
Code:
Set rg = createobject("WScript.Shell")
rg.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\" & rgname & "",winpath&"\SYSTEM32\" & newname

natürlich sind in dem kompletten Script noch die Variablen rgname und newname definiert, was hier in dem Schnipsel nicht der Fall ist - aber du musst den Pfad ja eh durch deine eigenen Angaben ändern...

thx das klappt perfekt unnd danke an alle anderen
 
Zurück
Oben