Discussion :

[tbar403]

Bonjour,

J'ai un timer qui crée un fichier et qui y accède toutes les 500ms pour y insérer des lignes
je veux que ce timer même si le fichier a été fermé puisse refaire un nouveau fichier :

j'ai ceci:

Code :

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

1
2
3
4
 
Private Sub Timer_depil_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer_depil.Tick
 
Static Dim SW As New StreamWriter(NOM_FICHIER)

ça marche pas mal mais si je fait un close du fichier, il ne me le recrée pas
(j'ai une exception)
j'arrive pas à redéfinir le streamwriter

merci pour votre aide

[tomlev]

Enlève le Static : quand tu déclares une variable locale avec Static, ça fait qu'elle n'est initialisée que la première fois et qu'elle garde ensuite sa valeur. Comme on ne peut pas réouvrir un StreamWriter qui est fermé, il faut forcément le recréer.

Et utilise un bloc Using pour être sûr que le ficher soit bien refermé à chaque fois.

Code :

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

1
2
3
4
5
6
7
Private Sub Timer_depil_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer_depil.Tick
 
    Using SW As New StreamWriter(NOM_FICHIER)
        ...
    End Using
 
End Sub

[Graffito]

Et aussi dans l'event du timer : Timer_depil.Enabled=false au début et Timer_depil.Enabled=true à la fin.

[tomlev]

Et aussi dans l'event du timer : Timer_depil.Enabled=false au début et Timer_depil.Enabled=true à la fin.

Pas formément... a priori c'est un timer Windows Forms, donc il peut pas exécuter plusieurs Ticks à la fois, vu que le Tick s'exécute toujours sur le thread de l'UI. Mais avec un autre type de timer, non lié à l'UI, il faudrait effectivement prendre ce genre de précautions...

[tbar403]

Bonjour,

J'ai essayé, je n'ai plus d'exception, mais par contre j'ai un fichier qui fait 0ko à la fin.
Je veux garder la référence au fichier quand je reviens dans l' évènement timer et en faire un nouveau si NOM_FICHIER (global) a changé


voilà le code

Code :

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

1
2
3
4
5
6
7
 
 
Private Sub Timer_depil_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer_depil.Tick
        Static init As Boolean
 
        'Static Dim SW As New StreamWriter(NOM_FICHIER)
        Using SW As New StreamWriter(NOM_FICHIER)

Merci pour tout

[tbar403]

j'ai trouvé mais je vais mangé d'abord !

[tomlev]

J'ai essayé, je n'ai plus d'exception, mais par contre j'ai un fichier qui fait 0ko à la fin.

Il faut que tu ouvres le fichier en mode "append" (ajouter à la fin du fichier) :

Code :

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

Using SW As New StreamWriter(NOM_FICHIER, True)

Soit dit en passant, ta méthode est beaucoup trop longue, tu devrais essayer de la refactoriser en plusieurs méthodes plus petites...

[tbar403]

J'ai fait ça:
dans les déclaration de la classe form:

Code :

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

Public file As System.IO.StreamWriter

ensuite j'ai créé une sub (qui est appelée dès qu'il y a un nouveau fichier à créer) où j'ai mis le code suivant:

Code :

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

file = My.Computer.FileSystem.OpenTextFileWriter(NOM_FICHIER, True)

puis

Code :

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

Timer_depil.Enabled = True

dans le timer , j'accède à 'file' par les méthodes file.WriteLine

dans le timer, s'il n'y a plus rien à faire dans le fichier, je fais:

Code :

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

file.close()

c'est vrai que le code est à refactoriser, tu as raison mais j'avais un autre souci !
En tout cas merci beaucoup pour l'aide et bonne journée

[Graffito]

Pas formément... a priori c'est un timer Windows Forms, donc il peut pas exécuter plusieurs Ticks à la fois,

C'est exact, mais si on a un intervalle de timer petit par rapport au temps d'éxécution de l'event, on va empiler des event timer et passer tout son temps à gérer ces events en bloquant plus ou moins les events de l'IHM.