hugo7
Messages postés352Date d'inscriptionsamedi 11 décembre 2010StatutMembreDernière intervention29 juin 2011
-
29 déc. 2007 à 10:16
hugo7
Messages postés352Date d'inscriptionsamedi 11 décembre 2010StatutMembreDernière intervention29 juin 2011
-
5 janv. 2008 à 08:58
Bonjour a tous je m'appele hugo et jai 14 ans je voudrais savoir si il est possible d'enlever ou de mettre tous les fichier d'un repertoire choisi en lecture seul, fichier archive ou fichier caché lorsque que l'utilisateur click sur un button.J'aurais besoin juste du code car jen'ai aucune idée de se qu'il faut mettre pour enlever ou mettre les fichier en lecture seul ...car pour l'evenement click du button et l'interface je sais faire.Je suis consient que je vous demande du code tous cuit donc je comprendrait si vous ne vouler pas me repondre.
Merci d'avance pour vos réponse.
hugo7
Messages postés352Date d'inscriptionsamedi 11 décembre 2010StatutMembreDernière intervention29 juin 2011 31 déc. 2007 à 11:37
Voici mon code:
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Integer, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer
Public Sub AttribAll(ByVal Directory As String, Optional ByVal Files As String = "*.*")
ShellExecute 0&, "OPEN", "attrib", "-R -A -H" & Files& " /s", Directory, 0&
End Sub.
cs_ghuysmans99
Messages postés3983Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 31 déc. 2007 à 11:54
Il faut mettre (je crois)
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Integer, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer
avant la déclarationde la classe (en l'occurence ton form)
_______________________________________________________________________
VB.NETis good ...VB6is better
Vous n’avez pas trouvé la réponse que vous recherchez ?
hugo7
Messages postés352Date d'inscriptionsamedi 11 décembre 2010StatutMembreDernière intervention29 juin 2011 31 déc. 2007 à 13:26
Sa ne marche pas je ne peut pas le mettre en dehors de ma classe.Mais en fait j'ai une erreur juste car j'ai rajouter le :" /s" ici :
ShellExecute 0&, "OPEN", "attrib", "-R -A -H" & Files& " /s", Directory, 0&
pour qu'il s'occupe aussi de sous repertoire.
Je sais pas
hugo7
Messages postés352Date d'inscriptionsamedi 11 décembre 2010StatutMembreDernière intervention29 juin 2011 31 déc. 2007 à 13:36
Ce bon sa marche trop cooooooooool
Donc maintenant sa s'occupera aussi des sous répertoire.
Donc mon dernier probleme ces pour les parametres en fait il faut que je mette le repertoire ou il y aura les modifications a faire mais ce répertoire change vu que l'utilisateur choisi le répertoire.
J'attends vos réponse et merci a tous .
cs_ghuysmans99
Messages postés3983Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 1 janv. 2008 à 11:43
C'est simplement le premier argument de AttribAll
_______________________________________________________________________
VB.NETis good ...VB6is better
cs_ghuysmans99
Messages postés3983Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 1 janv. 2008 à 21:06
Pour qu'il puisse être récursif (en ne changeant pas la fonction mais en l'appelant différemment) ...
_______________________________________________________________________
VB.NETis good ...VB6is better