UTILITAIRE DE DE-PROTECTION EN ÉCRITURE DE FICHIERS

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 17 août 2006 à 02:02
jmpol Messages postés 4 Date d'inscription lundi 26 septembre 2011 Statut Membre Dernière intervention 27 septembre 2011 - 27 sept. 2011 à 17:35
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/39127-utilitaire-de-de-protection-en-ecriture-de-fichiers

jmpol Messages postés 4 Date d'inscription lundi 26 septembre 2011 Statut Membre Dernière intervention 27 septembre 2011
27 sept. 2011 à 17:35
Merci d'avance
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
27 sept. 2011 à 16:42
En fait, il faudrait que j'envoie l'installation complète. VB nécessite toute sortes de DLLs 'parasites'. Je la prépare au-cazou.

Pour ce qui est de .NET...je suis passé à son apprentissage avec C#2010 Express. C'est gratuit. Le langage lui-même est plus direct et plus simple que VB.NET

VB.NET n'est pas une extension de VB6: c'est un tout autre langage.
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
27 sept. 2011 à 16:23
je vois, il faut qu'un bon samaritain t’envoie l’exécutable... Demande-le en MP à bitshifter, peut-être...

Amicalement,
Us.
jmpol Messages postés 4 Date d'inscription lundi 26 septembre 2011 Statut Membre Dernière intervention 27 septembre 2011
27 sept. 2011 à 16:07
Bonjour,

Mais en fait j'étais trés intéressé par ce petit programme qui permet d'autoriser en écriture des fichiers en lectures seule.
Car, aprés avoir fait une mise à jour du firmware de mon serveur, je constate que cette mise à jour à rendue impossible à l'écriture tous les fichiers de mon site internet. Quand au nom du SER autorisé, c'est manifestement le fruit d'un cafouillage informatique.
Bien sur je dispose des sources non verouillées, mais, là encore imossible de réécrire le mise à jour sur les anciens fichiers et donc d'actualiser le site.
Il reste le formatage, à la hussarde, comme me le conseille si finement le fabriquant, sauf que formatter un serveur c'est obligatoirement perdre de l'information et paralyser l'appareil pendant quarante huit heures mini.
Alors si je pouvais faire tourner ce programme, cela pourrait me donner un sacré coup de main.
Merci
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
27 sept. 2011 à 15:42
Bonjour,

JMPOL, VB6 n'est pas pareil que VB.NET

VB.NET c'est une autre génération par rapport à VB6. Et VB6, n'est (ou n'était) pas gratuit, contrairement à VB.NET.
Si tu n'as pas VB6 commence ton apprentissage avec VB.NET directement. VB6 c'est obsolète, bien que toujours très méritoire.

Une autre possibilité, c'est de faire tes premières armes avec la suite Office et le VBA. Le VBA c'est du VB6 mais intégrée dans Excel ou Word...

Bon courage à toi,
Amicalement,
Us.
jmpol Messages postés 4 Date d'inscription lundi 26 septembre 2011 Statut Membre Dernière intervention 27 septembre 2011
27 sept. 2011 à 11:12
Mais ou trouver tout ca ?
J'ai cherché et n'ai trouvé que visual basic express 2010. Mais cela ne marche pas du tout
Bien sur je débute, mais il faut bien commencer par là
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
27 sept. 2011 à 00:47
...ou lisez la Description...

VB6 n'est pas VB.NET (aussi appelé VB.Fred)
Double cliquer sur le document *.vbp ouvrira VB6.
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
27 sept. 2011 à 00:42
Après avoir téléchargé le zip et décompressé le tout dans un dossier, utiliser VB6 pour compiler l'exe ou utiliser directement dans le IDE (Integrated Development Environment.)

A l'ouverture, sélectionner le répertoire contenant les documents à déprotéger. Cocher la case si vous voulez aussi déprotéger les sous-répertoires. Clicker OK.

Simple.
jmpol Messages postés 4 Date d'inscription lundi 26 septembre 2011 Statut Membre Dernière intervention 27 septembre 2011
26 sept. 2011 à 23:48
Euh ...... comment on insalle et utilise ces fichiers
cs_graffity Messages postés 3 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 17 décembre 2008
16 déc. 2008 à 04:05
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
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
19 août 2006 à 19:45
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.
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
19 août 2006 à 12:57
Complément,

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

Us.
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
19 août 2006 à 12:49
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.
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
18 août 2006 à 18:49
...ick...
Merci.
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
18 août 2006 à 03:29
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
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
18 août 2006 à 00:58
Code corrigé.

Note d'intérêt public: Dir ne liste pas les dossiers avec l'attribut FILE_ATTRIBUTE_HIDDEN
bitshifter Messages postés 61 Date d'inscription mardi 1 février 2005 Statut Membre Dernière intervention 28 mai 2012 1
17 août 2006 à 02:35
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.
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
17 août 2006 à 02:02
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.