[VB.NET] Probleme avec les fichiers!!
voila le message d'erreur :
Citation:
Une exception non gérée du type 'System.IO.IOException' s'est produite dans mscorlib.dll
Informations supplémentaires*: Le processus ne peut pas accéder au fichier...(mon fichier)
voila se que je fais avec mon fichier :
dans un premier j'ouvre mon fichier pour compter le nombre de lignes:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14
| Function recupfichier() As String
Dim lecture As New StreamReader("certif.ini")
Dim retour As Integer = 0
Dim ligne As String
Dim fi As New StreamReader("certif.ini")
Do Until fi.Peek = -1 'lecture du fichier jusqu'a la fin
retour = retour + 1
ligne = fi.ReadLine() 'lecture de la ligne
recup = Split(ligne, "|") 'recup(0)=incrément recup(1)=nomProduit recup(2)=CLSID recup(3)=CléCertif
Loop
fi.Close()
Return retour
End Function |
et ensuite j'ajoute une ligne a la fin de celui ci :
Code:
1 2 3 4 5
| Function setLigneFichier(ByVal compteur As String, ByVal nomproduit As String, ByVal CLSID As String, ByVal clé As String)
Dim fiW As New StreamWriter("certif.ini", True) 'ajoutera a la fin du fichier
fiW.WriteLine(compteur + 1 & "|" & nomproduit & "|" & CLSID & "|" & clé)
fiW.Close()
End Function |
J'ai bien fait attention a fermer le fichier a chaque fois je ne comprend pas! :?: :!: :?: