                            Le Manuel Du CrAcKeuR
                 
                     
                         
                                   Part 6
                         
                     
                 
                               


I-INTRODUCTION

        Bonjour et bienvenue dans la 6me partit qui en fait n'est pas plus
complexe que les autres mais qu'y aborde un nouveau point: les programmes
Visual Basic :). J'ai crit ce cours pour vous faire patientez pour le 7 :)).


II-THE TOOLS OF THE TRADE

-Visual Basic Decompiler
Un dcompileur pour les progs VB 1&2&3 :).


III-GO AND FIGHT

        Cette fois nous allons nous attaquer  un ptit prog sympatique ma
fois: Complete Program Deleter V3.0, ce programme  pour fonction de detruire
tout ce qu'y  t install par le programme...

        Pour voir  quel point un code executable est nul vous n'avez qu'
dsassembler Wcpd et vous verrez une sorte d'horrible code executable
sans une seule string reference...plutt triste non?

        Bon heuresement il y a un outils qui va nous sauvez la vie: Visual
Basic Decompiler :). Ce programme transforme un code executable compil avec
Visual Basic en des fichiers Visual Basic :).

        Donc nous lanon le dcompilateur Visual Basic Decompiler PRO et nous
dcompilons ce chers programme...Bon il va vous demander ou foutre les
fichiers....choisissez un rpertoire et puis une fois la dcompilation finit
allez dans Save->Combined Form et puis ils va vous demander des trucs alors
cliquez sur la croix en haut  droite pour fermer la fentre :)). Donc vous
finirez par avoir un fichier CPD.BAS dans votre rpertoire :).

Alors l vous l'ouvrez avec votre diteur de texte prfr(EDIT ;). Et pis
vous looker:
*****************************************************************************
If  gv0016& <> 2147483000& Then
    Form3.Label1(10) = "This program is distributed as shareware."
    Form3.Label1(11) = "If you like this program enough to continue using it"
    Form3.Label1(12) = "beyond a 30 day trial period, you are required to"
    Form3.Label1(13) = "register it (pay for it) by sending $25.00 to:"
End If
*****************************************************************************

        Interressant et on ne peut plus explicite: si la variable gv0016
est gale  2147483000 alors le programme est enregistr... maintenant
cherchons ou cette valeur est mise  jours....
********************************************
If  Len(Dir$(gv0060$ + "WCPD.INI")) > 0 Then
    Open gv0060$ + "WCPD.INI" For Input As 1
    Line Input #1, gv0060$
    Line Input #1, gv005C$
    Input #1, gv0016&
    Close
End if
********************************************

        La on voit tout de suite qqchose d'interessant...le programme regarde
si le fichier WCPD.INI existe et si oui il l'ouvre, met la premire ligne dans
gv0060, la deuxime dans gv005C et la troisime dans gv0016...

        Bon voyons o est ce fichier WCPD.INI...dans le rpertoire windoz
surement....effectivement il est l :). Donc on l'ouvre et pis on tombe sur
qqchose dans ce genre
**********************
C:\WINDOWS
C:\
   72234
**********************

Le troisime truc est un chiffre!!! Mais c parfait a!!! Donc on change
ce chiffre en 2147483000 et on relance le logiciel et l......ohhhhh
le programme est enregistr...


IV-CONCLUSION

        C'tait vraiment faile cette fois i :))... Mais c'tait pour vous
montrer que les protections Visual Basic sont TOUJOURS stupides :). Et comme
de plus en plus de dbiles sortent des programmes fait avec Visual Basic
ce ptit cours vous donne une ide de comment les programmer :). Sinon je suis
en train de vous prparer 2 cours du tonnerre de dieu, sur des protections
assez complexes :)....wait and see ;).

SaTaNiK
<freaking@caramail.com>
http://www.multimania.com/gripsou/
