Fonction Open...For Binary pour visual basic 2005
cs_PHILOUVB
Messages postés
141
Date d'inscription
mardi 18 mars 2003
Statut
Membre
Dernière intervention
3 octobre 2010
-
14 févr. 2006 à 19:13
Dalida Messages postés 6728 Date d'inscription mardi 14 mai 2002 Statut Contributeur Dernière intervention 11 janvier 2016 - 15 févr. 2006 à 11:36
Dalida Messages postés 6728 Date d'inscription mardi 14 mai 2002 Statut Contributeur Dernière intervention 11 janvier 2016 - 15 févr. 2006 à 11:36
A voir également:
- Fonction Open...For Binary pour visual basic 2005
- Visual basic 2005 - Conseils pratiques -Visual Basic / VB.NET
- If visual basic - Conseils pratiques -Visual Basic / VB.NET
- Window open - Conseils pratiques -Javascript
- Visual basic ide ✓ - Forum Visual Basic
- Visual basic sleep ✓ - Forum Visual Basic
2 réponses
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
22
14 févr. 2006 à 19:33
14 févr. 2006 à 19:33
Salut,
Arf, je ne sais pas si cett méthode marche encore avec vb2005.
Tu peux faire comme ceci :
my.Computer.FileSystem.WriteAllBytes("tonfichier",tes_datas,false)
Pour une utilisation plus avancés je te conseilles plutôt d'utiliser les classes BinaryReader et BinaryWriter (présente dans le NameSpace System.IO)
<HR width="100%" SIZE=2>
Si la réponse te conviens merci de l'accepter
Arf, je ne sais pas si cett méthode marche encore avec vb2005.
Tu peux faire comme ceci :
my.Computer.FileSystem.WriteAllBytes("tonfichier",tes_datas,false)
Pour une utilisation plus avancés je te conseilles plutôt d'utiliser les classes BinaryReader et BinaryWriter (présente dans le NameSpace System.IO)
<HR width="100%" SIZE=2>
Si la réponse te conviens merci de l'accepter
Dalida
Messages postés
6728
Date d'inscription
mardi 14 mai 2002
Statut
Contributeur
Dernière intervention
11 janvier 2016
15 févr. 2006 à 11:36
15 févr. 2006 à 11:36
(en complément de la réponse de Willi)
salut,
au menu de la MSDN ce midi :
Imports System
Imports System.IO
Private Const FILE_NAME As String = "Test.data"
' Create the new, empty data file.
If File.Exists(FILE_NAME) Then
Console.WriteLine("{0} already exists!", FILE_NAME)
Return
End If
Dim fs As New FileStream(FILE_NAME, FileMode.CreateNew)
' Create the writer for data.
Dim w As New BinaryWriter(fs)
' Write data to Test.data.
Dim i As Integer
For i = 0 To 10
w.Write(CInt(i))
Next i
w.Close()
fs.Close()
' Create the reader for data.
fs = New FileStream(FILE_NAME, FileMode.Open, FileAccess.Read)
Dim r As New BinaryReader(fs)
' Read data from Test.data.
For i = 0 To 10
Console.WriteLine(r.ReadInt32())
Next i
r.Close()
fs.Close()
ms-help://MS.VSExpressCC.v80/MS.NETFramework.v20.fr/dv_fxfund/html/e209d949-31e8-44ea-8e38-87f9093f3093.htm
soit dit en passant, n'oublie pas de libérer les objets
r.Dispose
r = Nothing
idem pour fs.
à plus
[ Dalida ]
salut,
au menu de la MSDN ce midi :
Imports System
Imports System.IO
Private Const FILE_NAME As String = "Test.data"
' Create the new, empty data file.
If File.Exists(FILE_NAME) Then
Console.WriteLine("{0} already exists!", FILE_NAME)
Return
End If
Dim fs As New FileStream(FILE_NAME, FileMode.CreateNew)
' Create the writer for data.
Dim w As New BinaryWriter(fs)
' Write data to Test.data.
Dim i As Integer
For i = 0 To 10
w.Write(CInt(i))
Next i
w.Close()
fs.Close()
' Create the reader for data.
fs = New FileStream(FILE_NAME, FileMode.Open, FileAccess.Read)
Dim r As New BinaryReader(fs)
' Read data from Test.data.
For i = 0 To 10
Console.WriteLine(r.ReadInt32())
Next i
r.Close()
fs.Close()
ms-help://MS.VSExpressCC.v80/MS.NETFramework.v20.fr/dv_fxfund/html/e209d949-31e8-44ea-8e38-87f9093f3093.htm
soit dit en passant, n'oublie pas de libérer les objets
r.Dispose
r = Nothing
idem pour fs.
à plus
[ Dalida ]
