Discussion :

[seksaki]

bonjour !
j'ai un probleme qunad j'entre les informations dans :

[IMG][/IMG]

l'enregistrement est fais ! mais
lorsque j'ouvre le fichier .. je trouve des ecritures (nul null nul) //
[IMG][/IMG]

je sais pas comment l'eviter

[nikoko34]

Bonjour,
Tu ne fournis pas assez d'éléments pour que l'on puisse t'aider.
Ce ne sont pas des copies d'écran de l'application qui peuvent être utiles mais les bouts de code associés !

Sous quel format par exemple sont stockées les données ?

Quel est l'encoding utilisé, et pour écrire dans le fichier, et pour le visualiser ?

[seksaki]

ehh
j'ai oublie le code : du button d'ajout

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Structure stagiaire
        Dim nom As String
        Dim prénom As String
        Dim ladate As String
        Dim num As Double
    End Structure
    Public first As stagiaire
 
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim n, i As Integer
        Dim trouve As Boolean
        FileClose(1)
 
 
        FileOpen(1, "sta.TXT", OpenMode.Binary, OpenAccess.ReadWrite, OpenShare.LockReadWrite, Len(first))
        n = LOF(1) / Len(first)
        i = 1
        While Not EOF(1)
            FileGet(1, first, i)
            If TextBox1.Text = first.num Then
                trouve = True
                MsgBox("ce stagiaire existe déja", vbCritical, "warning")
 
                Exit Sub
            Else
                i = i + 1
            End If
        End While
        ecrireenregistrement()
        FilePut(1, first, n + 1)
        MessageBox.Show("l'enregistrement effectué avec succès")
        FileClose(1)
 
    End Sub
 Private Sub ecrireenregistrement()
        first.num = TextBox1.Text
        first.nom = TextBox2.Text
        first.prénom = TextBox3.Text
        first.ladate = TextBox4.Text
    End Sub

[nikoko34]

Bonjour,

C'est du VB6 ou du VB.NET ?

Par ce que en .NET, c'est plutôt la classe StreamWriter qui est utilisée pour écrire dans les fichiers.

D'autre part, je vois le mode binaire (OpenMode.Binary) ce qui explique probablement ces caractères non textuels...

[Sankasssss]

Hello,
si tu veux des exemples de streamWriter comme te le conseil nikoko34 regarde ces deux post :
http://www.developpez.net/forums/d69...penfiledialog/
http://www.developpez.net/forums/d69...icher-textbox/