Crypter / decrypter une adresse ipv4 sous format hexadecimal

Soyez le premier à donner votre avis sur cette source.

Vue 7 763 fois - Téléchargée 528 fois

Description

Voici mon premier post sur VBfrance
il est question ici de pouvoir crypter et decrypter votre adresse IP au format hexa.
Il m'est arrive de trouver des adresses ftp du genre
ftp://log:pass@2071727670:6969 par exemple (gg la team Inferno ...)
Etant un gros newBe, je trouvai cette méthode plus securisée car l'adresse etait masquée ...
Et pis c tout >.<
dsl mais le code n'est pas ters commenté, et j'ai retiré pas mal de bugs

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
21
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
7 décembre 2004

tu écris :

Dim quatre As String

et après :
If (quatre 255) Then tmp "Adresse broadcast"

Ca ne peux pas marcher, jamais ta string ne sera égale à un integer. Pareil pour les autres variables.
Au pire tu fait :
If (quatre "255") Then tmp "Adresse broadcast"
ou
tu redéclare tes variables comme il faut.

Tu fait des on Errror Resume Next, mais tu ne gère pas tes erreurs....
En bref bon courage pour l'apprentissage.
Et puis aprends à commenter ton code c'est important.
Messages postés
21
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
7 décembre 2004

Il manque un "then" au minimum dans ta sub...

Private Sub tim_Timer()
if (pg.Value = pg.max)
pg.Value = pg.Value + 1
End Sub
Messages postés
225
Date d'inscription
dimanche 19 octobre 2003
Statut
Membre
Dernière intervention
25 août 2008

cett methode est plus securisée oui mais facilement decryptable

parcequ'il suffit de faire un ping l'adresse cryptée et on voit s'afficher en clair l'adresse ip normale.

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.