Hi,
Here's a sample code to convert a text file to a binary file
Imports System.IO
Imports System.Runtime.Serialization.Formatters.Binary
Public Class Class1
Public Sub BinarySerialize()
'Create a streamreader class
Dim objStreamReader As StreamReader
'open the file
objStreamReader = File.OpenText("c:\\Mystore1.txt")
'Read the file storing it in the readfile string
Dim readfile As String = objStreamReader.ReadToEnd()
Dim flStream As FileStream = New FileStream("c:\\myStore.txt", FileMode.OpenOrCreate, FileAccess.Write)
Try
Dim bFormatter As BinaryFormatter = New BinaryFormatter
bFormatter.Serialize(flStream, readfile)
Finally
flStream.Close()
objStreamReader.Close()
End Try
End Sub
Cheers,
Monica
|