dat文件的创建和写入

[daknis]

谁能给个dat文件的操作的例子，我想用此文件当数据库使用

用来存数据，并且强行打开的时候，数据为乱码

请高手指点

[_NET2004]

应该是当作二进制文件来处理吧，我没用过，这个只是思路。

[guoruixing]

dat后缀可以是任意格式的，你可以把文件以二进制形式写入，然后保存为.dat就行了
或者自定义一段无用的byte型数据，然后加入你的文件的开头，然后写入文件，读取的时候程序里面把这段删掉

[daknis]

怎么样让打开后时乱码呢？哪位仁兄能给段代码参考下

[daknis]

没有人会吗？

[wanghui0380]

直接把dataset序列化就可以了，至于乱码就更好办了，弄个双向加密就成了

[水如烟]

参考
BinaryFormatter 类
以二进制格式将对象或整个连接对象图形序列化和反序列化。

[pjagz]

' phName="\demo.dat"

''' <summary>
''' 序列化---二进制
''' </summary>
''' <param name="phName">保存的文件名(例:"\文件名")</param>
''' <param name="BinSer">类型对象</param>
Public Sub BinSerialize(ByVal phName As String, ByVal BinSer As Object)
Dim ph As String = Application.StartupPath & phName
Dim fs As New FileStream(ph, FileMode.OpenOrCreate)
Dim bf As New BinaryFormatter
' Application.DoEvents()

Try
bf.Serialize(fs, BinSer)

Catch e As SerializationException
MsgBox("序列化: " & e.Message)
Throw
Finally
fs.Close()
End Try

End Sub

''' <summary>
''' 反序列化---二进制
''' </summary>
''' <param name="phName">读取文件名(例:"\文件名")</param>
''' <returns>对象类型</returns>
''' <remarks></remarks>
Public Function BinDeserialize(ByVal phName As String) As Object
Dim ph As String = Application.StartupPath & phName
If Dir(ph) = "" Then Return Nothing
Dim fs As New FileStream(ph, FileMode.Open)
Dim formatter As New BinaryFormatter

Try
Return formatter.Deserialize(fs)

Catch e As SerializationException

MsgBox("反序列化: " & e.Message)
Throw
Finally
fs.Close()
End Try
End Function

[UltraBejing]

我也想知道，正在找這方面的資料~~~~~