begin process at 2010 02 09 22:16:07
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Maths

 > CRYPTEUR D'IP

CRYPTEUR D'IP


 Information sur la source

Note :
Aucune note
Catégorie :Maths Niveau :Débutant Date de création :27/12/2003 Date de mise à jour :27/12/2003 10:59:21 Vu / téléchargé :2 852 / 242

Auteur : c00ol

Ecrire un message privé
Commentaire sur cette source (10)
Ajouter un commentaire et/ou une note

 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

  • 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
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 ++

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture CARAMAIL ENTER (CARAPROUTAGE...)
Source avec Zip SERPENT JEUX GSM

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) PISH2010-VB2008 par SaintMaur
Source avec Zip Source avec une capture PI-SH-2010-VB6 par SaintMaur
ET... PI... par us_30
Source avec Zip Source avec une capture CHIFFRAGE ET DECHIFFRAGE FONCTION AFFINE par tresorsdevie
NB PREMIER : TEST DE FERMAT ET DE MILLER-RABIN par us_30

Commentaires et avis

Commentaire de c00ol le 27/12/2003 00:38:25

Vos commentaires sont les bienvenus,insulte tous...toute facon chaqun sa facon...
++ bonn prog:d

Commentaire de carabidule le 27/12/2003 00:47:58

S'est un débus lol mais tu aprendera que tu peu fair bien plus simple :

text5 = (val(text1)*256) + (val(text2)*256) + (val(text3)*256) +(val(text4)*1)

;) Tchao

Commentaire de pwoc le 27/12/2003 09:58:18

C'est la methode qu'utilise EMule pour définir les ID

Commentaire de Sipadan le 27/12/2003 12:24:36

Intéressent, mais quelle est la façon de s'en servir sur le net. http://1375367498 ne marche pas!

Commentaire de blabla le 27/12/2003 18:55:51

moi je trouve ca bien , bon ya 1 moi jais demander a une charmante femme qui est sur ce site et elle ma tres bien espliquer ( je te remerci encore :) .
donc ouais c cool mais le projet que je voulais faire c un decrypteur moi ....mais jais pu de temp et la prog et moi lol c pas tro sa :P

Bonne continuation ++

Commentaire de kimmelf2 le 28/12/2003 02:24:10

euh ... carabidule, ton truc n'est pas bon !

text5 = val(text4) + 256 * (val(text3) + 256 * (val(text2) + 256 * val(text1)))

Commentaire de doppel2000 le 30/12/2003 10:13:48

--> carabidule & kimmelf2 :

Pour l'ip A.B.C.D l'ip en décimal est :

A * 256^3 + B*256^2 + C*256 + D

--> Sipadan

Si si ça fonctionne. Tu as du mal calculé ;)

Commentaire de ofeelfree le 05/01/2004 16:16:42

c = Text4 * 1 ...

un peu d'algorithmique que diable...

Commentaire de c00ol le 05/01/2004 17:28:19

héhé mai noter:/ les commentaires c bien mai bon jémerai un peu de poin:$ enfin lol...
Oué en effet vous reson même si quelqun de vous se son tromper dans leur calcul...Aller ciao;)

Commentaire de jambonbeure le 23/04/2004 19:19:07

bonjour,

moi j'aimerais simplement savoir par quel moyen tu crypte ton ip stp ? j'ai télécharger ton zip mais il y a seulement un url, un .txt de code source et 3 fichier bribes, donc aucun exe dedant, rien pour me permettre de crypter l'ip, donc si vous pouviez m'expliquez svp la procédure ?
merci d'avance

Amicalement

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,343 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales