Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[ATTENTE] - [BATCH] Crypt_Txt
Auteur Message
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Bonjour,

Après les nombreux problèmes dans le général à propos de la commande pour cacher le contenu d'un fichier dans un autre sans qu'il ne contienne rien,
j'ai décidé de faire un programme permettant de faire tout celà Okay

Le cryptage fonctionne parfaitement (enfin je crois)
Mais je rencontre un problème sur le dé-cryptage...

Voici le code source:

Code:

::************************::
::         TxtAff_        ::
::    Par Xavier Pacio    ::
::************************::
:: --- Copyright 2014 --- ::
:: - ALL RIGHT RESERVED - ::
::************************::
@Echo off
Title TexteShow - By Xavier Pacio
Color 79

:: Commentaires Variables

REM %ch0% = nomdufichier (Sans extension)
REM %ch% = nomdufichier.txt (Ajout de l'extension .txt)
REM %ch1% = nomdufichier_(De)Crypt.txt (Modif du nom pour cryptage/décryptage)


:: Menu principal
:Start
Mode 70,20
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Bienvenue %username% !
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  1) Crypter un fichier texte
Echo.
Echo  2) De-Crypter un fichier
Echo.
Echo  3) Quitter
Echo.
Echo.
Echo.
Set /P "choice=Entrez votre choix:"
If %choice%==1 Cls&Goto:Menu_1.0
If %choice%==2 Cls&Goto:Menu_2.0
If %choice%==3 Exit
Cls & Goto:Start

:: Menu 1 - Crypter un fichier texte
:Menu_1.0
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Veuillez entrer mettre ce batch dans le meme dossier
Echo    que le fichier a crypter puis entrer son nom ci-dessous.
Echo        - Attention: Il faut que ce soit un .txt !
Echo        - Ne pas mettre l'extension du fichier.
Echo.
Echo  Une fois que le fichier sera crypte, vous pourrez le decrypter
Echo    uniquement avec l'option 2 de ce programme.
Echo.
Echo.
Set /P "ch0=Nom du fichier:"
Set ch=%ch0%.txt
Set ch1=%ch0%_Crypt.txt
If exist %ch% (Cls&Call:Crypt_Decrypt&Goto:Menu_1.1) else (Cls&Goto:Error)
EXIT REM EN CAS D'ERREUR.
:Menu_1.1
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Votre fichier a bien ete crypte.
Echo.
Echo  Voulez vous supprimer le fichier non-crypte ?
Echo.
Echo  Entrez "O" pour oui, et "N" pour non.
Echo.&Echo.
Set /P "chx=O/N:"
If %chx%==O Del /S %ch%&Cls&Goto:Start
If %chx%==o Del /S %ch%&Cls&Goto:Start
If %chx%==N Cls&Goto:Start
If %chx%==n Cls&Goto:Start
Cls&Goto:Menu_1.1

:: Menu 2 - Décrypter un fichier texte
:Menu_2.0
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     De-Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Veuillez entrer mettre ce batch dans le meme dossier
Echo    que le fichier a decrypter puis entrer son nom ci-dessous.
Echo        - Attention: Il faut que ce soit un .txt !
Echo        - Ne pas mettre l'extension du fichier.
Echo.
Echo  Une fois que le fichier sera crypte, vous pourrez le decrypter
Echo    uniquement avec l'option 2 de ce programme.
Echo.
Echo.
Set /P "ch0=Nom du fichier:"
Set ch=%ch0%.txt
Set ch1=%ch0%_Decrypt.txt
If exist %ch% (Cls&Call:Crypt_Decrypt&Goto:Menu_2.1) else (Cls&Goto:Error)
EXIT REM EN CAS D'ERREUR.
:Menu_2.1
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     De-Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Votre fichier a bien ete decrypte.
Echo.
Echo  Voulez vous supprimer le fichier crypte ?
Echo.
Echo  Entrez "O" pour oui, et "N" pour non.
Echo.&Echo.
Set /P "chx=O/N:"
If %chx%==O Del /S %ch%&Cls&Goto:Start
If %chx%==o Del /S %ch%&Cls&Goto:Start
If %chx%==N Cls&Goto:Start
If %chx%==n Cls&Goto:Start
Cls&Goto:Menu_1.1

:: (Dé)Cryptage du fichier
:Crypt_Decrypt
For /F %%a in (%ch%) do echo %%a >> %ch1%:ADMIN
Goto:Eof


:: Programme par Xavier PACIO
:: Copyright 2014 - All right reserved


Where is the error ? Confused
Thanks !



Dernière édition par AlonsO7798 le Mar 16 Déc 2014 - 13:41; édité 1 fois

______________________________________________________
Une question ? N'hésitez pas à me contacter par Message Privé ou via le topique concerné.
Visiter le site web du posteur
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Ceçi n'est pas du cryptage mais de l'ADS. Mort de Rire

Un simple

Code:
 type Le_bat_a_crypter >> %ch1%:ADMIN


ferait l'affaire pas besoin de boucle FOR.

Et pour récuperer le code également :

Code:
 type %ch1%:ADMIN >> Le_bat_a_decrypter


Okay




______________________________________________________
AffPng.exe , StringBetween.exe , Hex2Png.exe
Répondre en citant
Message Yolo XD 
Et au lieu de mettre le nom du fichier à chaque fois, fais glisser-déposer le fichier dans la fenêtre cmd ^^

Code:

Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo            Veuillez glissez-déposer le fichier a crypter ici
Echo.
Echo  Une fois que le fichier sera crypte, vous pourrez le decrypter
Echo            uniquement avec l'option 2 de ce programme.
Echo.
Echo.
Set /P "ch2=Faites glisser le fichier ici : "
FOR /D %%i IN (ch2) DO set ch0=%%~nxi

Set ch1=%ch0%_Crypt.txt
If exist %ch2% (Cls&Call:Crypt_Decrypt&Goto:Menu_1.1) else (Cls&Goto:Error)
EXIT REM EN CAS D'ERREUR.
 





______________________________________________________
Visiter le site web du posteur
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Thanks pour les conseils,

Je testerais tout ça dès que j'aurais un peut de temps, et je ne savais pas que cela était de l'ADS sacha Mort de Rire Merci de la correction.




______________________________________________________
Une question ? N'hésitez pas à me contacter par Message Privé ou via le topique concerné.
Visiter le site web du posteur
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Bonjour,

Erreur fantôme, ENCORE ^^ Je vous mets le code entier, j'ai mixé vos deux codes pour que tout fonctionne, mais apriori non...

Code:

::************************::
::         TxtAff_        ::
::    Par Xavier Pacio    ::
::************************::
:: --- Copyright 2014 --- ::
:: - ALL RIGHT RESERVED - ::
::************************::
@Echo off
Title TexteShow - By Xavier Pacio
Color 79

:: Commentaires Variables

REM %cfg%  = Sortie du Set /P [@choice@]
REM %var1% = nomdufichier.txt (Ajout de l'extension .txt)
REM %var2% = nomdufichier_(De)Crypt.txt (Modif du nom pour cryptage/décryptage)


:: Menu principal
:Start
Mode 70,20
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Bienvenue %username% !
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  1) Crypter un fichier texte
Echo.
Echo  2) De-Crypter un fichier
Echo.
Echo  3) Quitter
Echo.
Echo.
Echo.
Set /P "choice=Entrez votre choix:"
If %choice%==1 Cls&Goto:Menu_1.0
If %choice%==2 Cls&Goto:Menu_2.0
If %choice%==3 Exit
Cls & Goto:Start

:: Menu 1 - Crypter un fichier texte
:Menu_1.0
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Veuillez glisser le fichier a crypter sur cette fenetre,
Echo    puis appuyer sur "ENTRER".
Echo.
Echo        - Attention: Il faut que ce soit un .txt !
Echo        - Ne pas mettre l'extension du fichier.
Echo.
Echo  Une fois que le fichier sera crypte, vous pourrez le decrypter
Echo    uniquement avec l'option 2 de ce programme.
Echo.
Echo.
Set /P "cfg="
FOR /D %%i IN (%cfg%) DO set var1=%%~nxi
If exist %var1% (

   Cls
   Set var2=%var1%_Crypt.txt
   Call:Crypt_Decrypt
   Goto:Menu_1.1
   
) else (Cls&Goto:Error)
EXIT REM EN CAS D'ERREUR.
:Menu_1.1
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Votre fichier a bien ete crypte.
Echo.
Echo  Voulez vous supprimer le fichier non-crypte ?
Echo.
Echo  Entrez "O" pour oui, et "N" pour non.
Echo.&Echo.
Set /P "chx=O/N:"
If %chx%==O Del /S %ch%&Cls&Goto:Start
If %chx%==o Del /S %ch%&Cls&Goto:Start
If %chx%==N Cls&Goto:Start
If %chx%==n Cls&Goto:Start
Cls&Goto:Menu_1.1

:: Menu 2 - Décrypter un fichier texte
:Menu_2.0
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     De-Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Veuillez glisser le fichier a crypter sur cette fenetre,
Echo    puis appuyer sur "ENTRER".
Echo.
Echo        - Attention: Il faut que ce soit un .txt !
Echo        - Ne pas mettre l'extension du fichier.
Echo.
Echo  Une fois que le fichier sera crypte, vous pourrez le decrypter
Echo    uniquement avec l'option 2 de ce programme.
Echo.
Echo.
Set /P "cfg="
FOR /D %%i IN (%cfg%) DO set var1=%%~nxi
If exist %var1% (

   Cls
   Set var2=%var1%_Crypt.txt
   Call:Crypt_Decrypt
   Goto:Menu_1.1
   
) else (Cls&Goto:Error)
EXIT REM EN CAS D'ERREUR.
:Menu_2.1
Echo.
Echo   ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
Echo   º      TextShow_      º
Echo   ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
Echo.
Echo     De-Crypter un fichier texte - By AlonsO
Echo   ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Echo.
Echo  Votre fichier a bien ete decrypte.
Echo.
Echo  Voulez vous supprimer le fichier crypte ?
Echo.
Echo  Entrez "O" pour oui, et "N" pour non.
Echo.&Echo.
Set /P "chx=O/N:"
If %chx%==O Del /S %ch%&Cls&Goto:Start
If %chx%==o Del /S %ch%&Cls&Goto:Start
If %chx%==N Cls&Goto:Start
If %chx%==n Cls&Goto:Start
Cls&Goto:Menu_1.1

:: (Dé)Cryptage du fichier
:Crypt_Decrypt
Type %ch0%:ADMIN > %ch1%
::For /F %%a in (%ch%) do echo %%a >> %ch1%:ADMIN
Goto:Eof


:: Programme par Xavier PACIO
:: Copyright 2014 - All right reserved


@+




______________________________________________________
Une question ? N'hésitez pas à me contacter par Message Privé ou via le topique concerné.
Visiter le site web du posteur
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Hello, j'ai trouvé ton erreur fantôme : Le label :Error n'existe pas Laughing

regarde :
Code:
Set /P "cfg="
FOR /D %%i IN (%cfg%) DO set var1=%%~nxi
If exist %var1% (

   Cls
   Set var2=%var1%_Crypt.txt
   Call:Crypt_Decrypt
   Goto:Menu_1.1

) else (Cls&Goto:Error)


à la fin tu met : else (Cls&Goto:Error)

Crée simplement un label error Okay




______________________________________________________
Visiter le site web du posteur
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
(ceci est un UP mais c'est secret Mort de Rire Laughing Mort de Rire)





______________________________________________________
Visiter le site web du posteur
Répondre en citant
Message [ATTENTE] - [BATCH] Crypt_Txt 
Bonjour,

Merci pour l'UP Okay Je vais refaire le code et vous tiendrais au courant.

Thanks, @++




______________________________________________________
Une question ? N'hésitez pas à me contacter par Message Privé ou via le topique concerné.
Visiter le site web du posteur
Message [ATTENTE] - [BATCH] Crypt_Txt 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch