voila le message d'erreur :
voila se que je fais avec mon fichier :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)
dans un premier j'ouvre mon fichier pour compter le nombre de lignes:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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!:
![]()
:
Partager