begin process at 2010 03 21 01:53:05
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > UTILITAIRE DE DE-PROTECTION EN ÉCRITURE DE FICHIERS

UTILITAIRE DE DE-PROTECTION EN ÉCRITURE DE FICHIERS


 Information sur la source

Note :
Aucune note
Catégorie :Divers Classé sous :utilitaire, outil, aide Niveau :Débutant Date de création :14/08/2006 Date de mise à jour :09/07/2008 15:22:33 Vu / téléchargé :17 681 / 1 208

Auteur : bitshifter

Ecrire un message privé
Site perso
Commentaire sur cette source (9)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Utilitaire pour enlever la protection en écriture de tous les fichiers d'un répertoire avec, en option, recursion sur tous les sous-répertoires.

Une fois l'application lancée, sélectionner le répertoire contenant les fichiers à déproteger. Si ce répertoire en contient d'autres que vous voulez déproteger aussi, cocher la boite "Inclure les sous-fichiers".

Vous pouvez aussi clicker sur le bouton "?" qui vous dira comment faire.

Clicker "OK" et le programme mettra tous les fichiers en READ/WRITE.



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

18 août 2006 01:01:18 :
Modifé pour restaurer l'attribut "archive". Découvert que la fonction Dir ne liste pas les documents avec l'attribut "HDDEN".
18 août 2006 18:53:00 :
Comment ne pas détruire les autres attributs en changeant un seul, selon les commntaires de Gobillot.
19 août 2006 19:48:32 :
' Pour receullir tout les documents, ' il suffit de passer en option les flags désirés que ceux-ci pourraient avoir ' soit Dir( [répertoire] , vbArchive + vbHidden + vbReadOnly + vbSystem). ' Personnelement, j'aime mieux ne pas inclure les 'vbSystem': ' assez de problèmes comme ca. strContent = Dir$(strPath & "*.*", vbDirectory + vbArchive + vbHidden + vbReadOnly)
09 juillet 2008 15:22:33 :
Ai introduit explications sur l'usage.

 Sources du même auteur

Source avec Zip Source avec une capture SQL SANS DOULEUR, EXEMPLE
Source avec Zip COMMENT MANAGER LES FORMES DANS UN PROJET.
Source avec Zip Source avec une capture IMPRESSION NETTE PAR CODE
Source avec Zip Source avec une capture DOCUMENT INI COMME OBJET
Source avec Zip Source avec une capture REMPLACER LA BARRE DE PROGRÈS.

 Sources de la même categorie

Source avec Zip LECTURE DXF, par pinatl
Source avec Zip Source .NET (Dotnet) GESTION DE RECETTES par DVDou
Source avec Zip Source avec une capture Source .NET (Dotnet) SYSTEMBACKUP.VB par DVDou
Source avec Zip Source avec une capture DESKTOP WALLPAPER V 5.0 par shaeks
Source avec Zip Source avec une capture Source .NET (Dotnet) SPACE - UN SPACE MAC POUR WINDOWS par vbnino

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture TRAITEMENT DES NOMS DE FICHIERS. par artgile
Source avec Zip Source avec une capture SIMULATEUR DE VITESSE. par artgile
Source avec Zip Source avec une capture EDITEUR DE COMANDE VB6 ET VBA EXCEL par artgile
Source avec Zip VISUALISATION BASE ACCESS par claude440
Source avec Zip Source .NET (Dotnet) VISION : TRACÉ DE FONCTION ET MODULE D'ANALYSE par magic

Commentaires et avis

Commentaire de Gobillot le 17/08/2006 02:02:11

si le but est d'enlever seulement l'attribut ReadOnly, alors pourquoi enlever les autres aussi ?
l'attribut Archive par exemple
et plus grave encore, Système et Hidden seront supprimés par ton programme.

attention SetAttr ne gère pas les attributs étendus,
par contre il les enlève (attribut indexation sera supprimé également)
il faut utiliser GetFileAttributes et SetFileAttributes beaucoup plus performant.

Commentaire de bitshifter le 17/08/2006 02:35:46

C'est vrai.
Ce code fait il y a quelques années avait pour but de rendre "writable" des tonnes de dossiers copiés à partir de CD.
Je vais modifier et recharger demain.

Commentaire de bitshifter le 18/08/2006 00:58:29

Code corrigé.

Note d'intérêt public: Dir ne liste pas les dossiers avec l'attribut FILE_ATTRIBUTE_HIDDEN

Commentaire de Gobillot le 18/08/2006 03:29:04

non non c'est pas bon
faut pas faire plusieurs SetFileAttributes, sinon seul le dernier sera pris en compte
il faut faire un masque avec l'attribut qu'on veut enlever et c'est tout

lngFileAttr = GetFileAttributes(strPath & strContent)
If lngFileAttr And vbReadOnly Then
   SetFileAttributes strPath & strContent, lngFileAttr And (Not vbReadOnly)
   End If

ok pour le Hidden, mais vaut mieux prendre de bonnes habitudes,
si on modifie un attribut, il faut laisser les autres intacts

Commentaire de bitshifter le 18/08/2006 18:49:59

...ick...
Merci.

Commentaire de us_30 le 19/08/2006 12:49:07

Bonjour,

Je pense que tu te trompes en disant que DIR ne liste pas les attributs cachés. IL suffit de passer en option, "vbhidden" pour les voir... soit Dir( [répertoire] , vbarchive + vbhidden ). Cette liste peut d'ailleurs s'agrandir avec : vbReadOnly + vbSystem...

Amicalement,
Us.

Commentaire de us_30 le 19/08/2006 12:57:41

Complément,

Pour les dossiers spécifiquement, il faut utiliser : vbDirectory + vbHidden + vbSystem ...

Us.

Commentaire de bitshifter le 19/08/2006 19:45:42

J'ai remodifié mon code dans ce sens mais cette option ne s'était jamais présentée à date puis que ce programme ne changait que des masses de copies provenant de sources protégées en écriture.
Mais je ne touche pas au vbSystem. Ah non alors: assez de problèmes comme ca.

Commentaire de graffity le 16/12/2008 04:05:18

bonsoir

après avoir télécharger & décompressé les fichiez du ZIP dans un dossier je me retrouve avec plusieurs fichier (9 exactement) que je ne sais comment utilisé de sorte a ce que l'ouverture de l'utilitaire (montrer en haut dans la capture d'écran) s'ouvre.
pourriez vous m'expliquez comment ce servir correctement de ces fichier ou me donner l'url d'un endroit ou ce trouve un tuto qui explique cela

merci

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Aide sur l'outil AnimGif [ par christophexv ] Bonjour,je suis débutant et je voudrais insérer l'outil AnimGif ds la boite a outil; quel est le contrôle que je dois sélectionner ds Composantsmerci Décompilation de vb.net [ par BrokenArrow29 ] Bonjour tout le monde, J'aurais besoin de votre aide pour proteger un programe de la décompilation. J'ai réalisé un utilitaire que je donne a mes usa programmation VB lecteur de carte bancaire [ par bakalasup ] bjr les pros je viens vers vous pour avoir de l'aide au sujet de la programmation d'un lecteur de carte bancaire en VB. Y a t'il qlq'un qui à dé aide vb.net [ par sth56500 ] bonjour désolé de vous ennuyer Je vous explique mon souci . j'ai par le biais de vb2008 express fait 'architecture graphique de mon programme (jusqu VBA champs de saisie [ par JMLebnen ] Bonjour, je suis novice en VBA, et j'aimerai pouvoir après avoir cliqué sur un bouton que j'appelle "aide", qu'un champs de saisie s'ouvre après des e novice cherche aide pour utiliser un programme ! [ par jaro975 ] Bonjour, j'ai un souci avec une imprimante Canon LBP + serveur d'impression (celui de la Freebox) et j'ai trouvé ici une astuce très intéressante. ht Aide pour un controle boutton [ par Blackcatthc ] bonjour je vient de passer de vb6 a vb express 2008 et je bloque déjà sur le contrôle bouton. Je souhaiterais mettre une image (Downpicture dans vb6 [Déplacé .Net --> VBA] Changement de données lorsqu'on change de valeurs dans une cellule [ par DarkVBiste ] Bonjour à tous, tout d'abord je voulais remercier les gens du forum pour leur aide, on apprend vraiment beaucoup de choses ici. C'est pour cela que j' demande d'aide [ par simou12 ] je voudrai une application sous vb6 qui m'aide à gerer l'inventaire du materiel ou mobilier existant à ma société la base de donee se constitue des ob a l aide pour confection d une presentation en vb et liens avec autre page excel et code barre [ par ericmister ] bonjour a tous je cherche quelqu un pour m aider a faire un petit programme visual basic si personne dans la marne ou en limite de l aube possibilité


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,796 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales