Bonjour ,
j'ai un petit probleme sous vb.net
je suis debutant , et lorsque j'essaie le programme ci-dessous l'erreur suivante se presente au niveau de la fonction FileGet(1,c,-1)
apparament , elle est produite par la presence du tableau au sein de la structure
le fichier"database.txt" existe bien et bien complet
Une exception non gérée du type 'System.IO.EndOfStreamException' s'est produite dans microsoft.visualbasic.dll
Informations supplémentaires : Unable to read beyond the end of the stream.
Pourriez-vous m'aider
En vous remerciant d'avance
Public Class Form1
Inherits System.Windows.Forms.Form
Public Structure essai
Dim a As Byte
Dim b() As Byte
End Structure
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim c As essai
Dim d As Integer
ReDim c.b(2)
d = Len(c)
FileOpen(1, "database.txt", OpenMode.Binary, OpenAccess.Read)
FileGet(1, c, -1)
FileClose(1)
End Sub
End Class
Vantuykom Alain
a.vantuykom@freebel.net