Page 1 sur 1

AES Protector v1.3.2

Publié : mar. 13/août/2019 11:15
par Ar-S
Image

Voilà un petit utilitaire que j'ai réalisé pour mes clients pro du fait du RGPD.
Il permet de chiffrer/déchiffrer des fichiers en AES 256bits par glisser/déposer
Mon programme utilise 7zip.
Il est portable, n'inscrit rien dans le registre et n'installe rien sur le système. Les dll sont incluent.

Portable : Oui
Prix : Gratuit
OS : testé sous Windows 10 (32/64bits)


Plus de détails dans l'aide ? du logiciel.

Récupérable : ICI

Merci pour vos éventuels retours.

Re: AES Protector

Publié : mar. 13/août/2019 11:33
par SPH
On pourrait avoir le code PB ? (pour voir si ce n'est pas cassable) :idea:

Re: AES Protector

Publié : mar. 13/août/2019 16:37
par Ar-S
Non, surtout que c'est pro.
De plus le code est accessible sur le site de 7zip
Pour ce qui est du cryptage, si tu peux déchiffrer de l'AES 256bits c'est que le mot de passe est daubé (via brut force ou dico) ou que tu as N pc à ta dispo pour brute force comme un porc :)
Mais ça ça vaut pour tout les chiffrements.

Re: AES Protector v1.3

Publié : ven. 16/août/2019 14:29
par Ar-S
Version 1.3 (stable)
- Corrections
* recommencer ou non demande de mot de passe si champ vide
* Gestion du glisser/déposer pour un seul fichier à la fois
- Gestion de la prise en charge des extensions .exe[EncrypteD] fonctionnelle si vous souhaitez "Ouvrir avec" le logiciel.

Re: AES Protector v1.3

Publié : ven. 16/août/2019 20:36
par Marc56
* Gestion du glisser/déposer pour un seul fichier à la fois
Pour gérer plusieurs fichiers en glisser/déposer il suffit de boucler avec CountProgramParameters()) et de les mettre dans une liste.
Ici une série de fichiers droppés sur l'icône seront traités un par un.

Code : Tout sélectionner

NewList All_Files$()

; Ajouter en liste tous les fichiers passés en paramètres ou droppés sur l'icone
For i = 1 To CountProgramParameters()
  AddElement(All_Files$())
  All_Files$() = ProgramParameter(i-1)
  All_Files$   + All_Files$() + Chr(10)
Next

; Traiter les fichiers en série ici (test avec simple copie)
If MessageRequester("Crypter les fichiers ?", All_Files$,
                    #PB_MessageRequester_YesNo) = #PB_MessageRequester_No
  MessageRequester("OK", "Annulé")
  End
Else
  ; Pour test: utilisation de la commande copy (et ajout de l'extension)
  ForEach All_Files$()
    If Not CopyFile(All_Files$(), All_Files$() + ".Crypt")
      MessageRequester("Erreur sur fichier ", All_Files$())
    EndIf
  Next
EndIf

Re: AES Protector v1.3

Publié : ven. 16/août/2019 21:08
par Ar-S
Merci Marc56, c'est un choix volontaire.
Mes clients ont de toutes façon un fichier à envoyer à un instant T. J'ai conçu ce soft pour ça.
J'avoue que le plus chiant a été de justement limiter le drad n drop à un seul fichier :) 7zp renvoyant un nom comme "fichier1.trucfichier2.truc" lors d'un multimple drag n drop. J'ai paré à ce soucis via une liste chainée mais comme dit plus haut, je préfère ne pas laisser aux utilisateurs la possibilité de chiffrer plusieurs fichiers à la fois.

Re: AES Protector v1.3.2

Publié : lun. 19/août/2019 16:23
par Ar-S
v1.3.2
- Corrections de bugs mineurs
- Ajout d'une barre d'info en bas du programme.

Re: AES Protector v1.3.2

Publié : lun. 19/août/2019 21:46
par venom
Fonctionne bien chez moi. Simple, efficace. Merci
Ps: des ImageGadget a la place des ButtonGadget non ? :lol:






@++

Re: AES Protector v1.3.2

Publié : mar. 20/août/2019 11:42
par Ar-S
venom a écrit :Fonctionne bien chez moi. Simple, efficace. Merci
Merci pour ton retour
venom a écrit :Ps: des ImageGadget a la place des ButtonGadget non ? :lol:
Pour un X et un ? je vais pas m'embêter avec ça :P ..