Lecture seule ..............en VB/VBA

[dr.loveless]

Salut,

 

Comment puis-je affecter la lecture seule à un fichier ?

 

 

Merci

[Pako]

Salut Doc !

 

Voici une petite exemple qui pourra sûrement t'aider :

 

 
Sub CreerUnFichierTxt()
....Set fs = CreateObject("Scripting.FileSystemObject")
....Set a = fs.CreateTextFile("c:\testFichier.txt", True)
....a.WriteLine ("Ceci est un test.")
   
....[surligneur]SetAttr "c:\testFichier.txt", vbReadOnly[/surligneur]    ' Set lecture seule
....a.Close
End Sub

 

 

 

 

 

 

 

 

 

[Edité le 25/8/2005 par Pako]

[dr.loveless]

Yes, Merci beaucoup.