chacher des repertoires - VB/VBA/VBS - Programmation
Marsh Posté le 18-12-2002 à 17:40:58
Code :
|
tu dois avoir "Microsoft scripting runtime" dans les references de ton projet
Marsh Posté le 18-12-2002 à 17:56:03
je comprends pas :
g visual basic 6
si je colle ton code ds une sub d'un bouton par exemple ce ki donne ça :
Private Sub Command1_Click()
Dim fso As FileSystemObject
Dim rep As Folder
Set fso = New FileSystemObject
Set rep = fso.GetFolder("c:\windows\bureau\test" )
rep.Attributes = rep.Attributes Or Hidden
End Sub
si je lance et que je clique sur le bouton g l'érreur suivante:
Erreur de compilation , type defini par l'utilisateur non définit.
et ça surligne "As FileSystemObject"
Citation : tu dois avoir "Microsoft scripting runtime" dans les references de ton projet |
ça veut dire koi ??
que je dois installer le composant "Microsoft scripting runtime"
si c le cas je l'ai pas trouvé ds la liste.
En gros g rein capté a ton truc
pourait-tu etre plus précis ??
Merci
Marsh Posté le 18-12-2002 à 18:20:39
william10 a écrit :
ça veut dire koi ?? |
Difficile d'être plus précis, mais je vais quand même essayer.
Dans le Menu projet, tu cliques sur "references", une fenêtre s'ouvre avec une liste. dans la liste tu cherches "Microsoft Scripting Library" et tu coches la case à gauche de son nom. Cliques su OK. Execute ton projet et normallement ça marche.
Marsh Posté le 18-12-2002 à 18:49:02
en effet merci, j'ai plus dérreur mais le dossier ne disparait au moment du clic :\
est-ce normal ???
code utlisé :
Private Sub Command1_Click()
Dim fso As FileSystemObject
Dim rep As Folder
Set fso = New FileSystemObject
Set rep = fso.GetFolder("c:\windows\bureau\test\" )
rep.Attributes = rep.Attributes Or Hidden
End Sub
Marsh Posté le 18-12-2002 à 19:00:16
je crois kon c mal compris, je ne veux pas cacher un repertoire qui redeviendrai visible si ds l'explorer on met affichier le fichiers et dossier cacher...
je voudrais que pour windows il devienne inexistant comme le font certaitn programmmes style windefender ou encore magicfolders....
c mieux aisi ou toujours pas ?
Marsh Posté le 18-12-2002 à 19:08:27
william10 a écrit : je crois kon c mal compris, je ne veux pas cacher un repertoire qui redeviendrai visible si ds l'explorer on met affichier le fichiers et dossier cacher... |
là ça devient beaucoup plus complexe et je doute que ça soit possible de faire ça en quelques lignes de VB.
Marsh Posté le 19-12-2002 à 15:49:13
Regarde du coté de SetAttr, je ne suis pas sur que ca fonctionne pour les répertoires.
Marsh Posté le 18-12-2002 à 17:30:10
ya til une commande en visual basic pour cacher des répertoires sous windows. Aisi l'explorateur croirai kils existent plus ??