Outils pour protéger les exécutables VB 6Résolu

Question

Bonjour,

Est ce que quelqu'un connait un logiciel payant sûrement pour protéger les exécutables VB6 contre la décompilation ou au moins rendre les chaines de caractères illisibles.

Merci pour votre aide

cs_Jack · Accepted Answer

Voilà un exemple d'une chaine de caractères ou j'ai décalé de +10 le code ASCII de chaque caractère :
Myno}7]y|mo}*o}~*pkx~k~s}{o*+

Message original : "Codes-Sources est fantatisque !"

Alors bien sûr, on tombe sur des caractères 'non imprimables', mais pas grave.
Si tu veux quelque chose de sûr sans être embêté avec ces caractères, tu peux convertir ta chaine cryptée en hexa :
4D796E6F7D375D797F7C6D6F7D2A6F7D7E2A706B787E6B7E737D7B7F6F2A2B
 
Pour le fun :
    Dim maChaine        As String
    Dim maChaineCryptée As String
    Dim monDecalage     As Byte
    Dim r As Long
    
    maChaine = "Codes-Sources est fantatisque !"
    monDecalage = 10
    
    maChaineCryptée = ""
    For r = 1 To Len(maChaine)
        maChaineCryptée = maChaineCryptée & _
                          Chr$(Asc(Mid$(maChaine, r, 1)) + monDecalage)
    Next r

    maChaine = ""
    For r = 1 To Len(maChaineCryptée)
        maChaine = maChaine & _
                   Right$("00" & Hex$(Asc(Mid$(maChaineCryptée, r, 1))), 2)
    Next r
    
    Debug.Print maChaineCryptée
    Debug.Print maChaine

cs_Jack · Answer

Salut

Décompiler du VB6 : A part l'interface graphique, je n'ai jamais vu de décompilateur de programme.

Masquer les chaines : Un petit algorithme maison et le tour est joué, comme par exemples ajouter ou retrancher une valeur fixe aux codes ASCII composant les textes.
Seul impératif : toutes les chaines 'cryptée' doivent être contenues dans des variables et il faut les décrypter avant de s'en servir.
Pas compliqué à faire.
Sinon, il y a les vrais cryptages : il faudra bien sûr choisir un cryptage symétrique (permettant les 2 sens)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

sigmatc24 · Answer

Merci pour ta réponse, cela me rassure quant à la décompilation des exécutables. Et merci pour ton code très utile et qui fait largement l'affaire

Cordialement

rebixav · Answer

quitte à qu'une chaine soit cripté autant la compressé pour prendre moins de place :

le lien est là :
http://www.vbfrance.com/codes/COMPRESSION-DECOMPRESSION-TRANSFERT-FICHIERS-PORT-SERIE-RS-232_3652.aspx

je m'en suis fait une sub compression et decompression, sans aucun paramètre à ajouter !

Outils pour protéger les exécutables VB 6

4 réponses

Votre réponse

Discussions similaires