Crypteur d'ip

Description

Salut,voila ce code permet de crypter son ip crypter c'est beaucoup dire je veux dire c'est crypter comme sa lol...
Breff l'expliquation de sa « système décimal ou systeme en base b »
L'on va prendre comme exemple : 152.156.231.213
Sois en système décimal :
152 *256(exposant 3) = 2550136832
156 *256(exposant 2) = 10223616
231 *256(exposant 1) = 59136
213 *1 = 213

Si on additionne tous sa donc 2550136832+10223616+59136+213 = 2560419797

Héé oui,en effet cette fonction assez connue peux permettre un ping ou autre...
Genre Demarrer>Executer...>cmd>Ping VOTRE IP CRYPTER.
Et bien vous abtonez votre vrai ip.
Vous me direz a quoi sa va servire etc...m'en fou toute facon ++
Bonne prog

Source / Exemple :


Private Sub Command1_Click()
On Error Resume Next
a = Text1
c = Text1 * 16777216 'On multiplie le texte 1 par ce nombre car c'est = a 256*256*256
Text5 = c
a = Text2
c = Text2 * 65536 ' meme chose cette fois utilisant 256*256
Text6 = c
a = Text3
c = Text3 * 256 ' *256
Text7 = c
a = Text4
c = Text4 * 1 ' *1
Text8 = c
End Sub

Private Sub Command2_Click()
Text9.Text = Val(Text5) + Val(Text6) + Val(Text7) + Val(Text8) 'Une addition qui crypte l'ip
Caption = "Ton ip crypter est " + Text9 + "  by c00ol" 'Changer la caption de la form apres cryptage
End Sub

Private Sub Form_Load()
Label2 = Winsock1.LocalIP 'pour connaitre l'ip de notre pc!
End Sub

Conclusion :


Fin (-; bayyyy ++

Codes Sources

A voir également

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.