Discussion :

[Sadneth]

bonjour,

Je souhaite simplement supprimer un fichier en lecture seule. Apparemment, je n'ai pas le droit par code de supprimer un fichier en lecture seule. Est-ce possible de changer l'attribut du fichier par code, puis de supprimer celui-ci ?

[StormimOn]

En utilisant la classe FileInfo

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
dim fi as FileInfo = new FileInfo(@"X:\...\...\monfichier.ext");
fi.IsReadOnly = false;
fi.Delete();

Je ne fais pas de VB.Net mais la syntaxe devrait être bonne. Il faut évidemment gérer les exceptions sur le Delete() même si je ne l'ai pas fait

[Sadneth]

salut,

Je n'ai pas de propriété isReadonly.

Voici le code que j'ai actuellement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
' test si le fichier est en lecture seule
Dim f As New FileInfo(sFichierASupprimer)
If Not (f.Attributes.ReadOnly = FileAttributes.ReadOnly) Then : f.Delete()
Else :  ' Faut que j'en lève la lecture seule
EndIf
f = Nothing

[abelman]

f.Attribute est un champ de bits. Il faut faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim f As New FileInfo("")
If (f.Attributes And FileAttributes.ReadOnly) = 0 Then
  f.Delete()
Else
    f.Attributes = f.Attributes And Not FileAttributes.ReadOnly
End If

[Sadneth]

Bon ca marche !


Je t'avoue que je ne comprend pas les lignes de code


Où sont les tags résolus svp ?

[neguib]

f.Attribute est un champ de bits. Il faut faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim f As New FileInfo("")
If (f.Attributes And FileAttributes.ReadOnly) = 0 Then
f.Delete()
Else
f.Attributes = f.Attributes And Not FileAttributes.ReadOnly
End If

Si le but poursuivi est de supprimer le fichier quelquesoit son état, je préfère

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim f As New FileInfo("blablabla")
If Not((f.Attributes And FileAttributes.ReadOnly) = 0) Then
   f.Attributes = f.Attributes And Not FileAttributes.ReadOnly
End If
f.Delete()

[Sadneth]

oui, c'est ce que j'ai fait en fait ^^