当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 在VB.NET里操作文本文件

ASP.NET
Asp.net利用JQuery弹出层加载数据代码
asp.net dataview做无限极分类的又一用法
asp.net ckeditor编辑器的使用方法
告别ADO.NET实现应用系统无缝切换的烦恼(总结篇)
asp.net 实现动态显示当前时间(不用javascript不考虑开销)
.net动态显示当前时间(客户端javascript)
asp.net 结合YUI 3.0小示例
asp.net 取消缓存相关问题说明
asp.net 计划任务管理程序实现,多线程任务加载
ASP.NET 跨页面传值方法
asp.net中url地址传送中文参数时的两种解决方案
Asp.net 菜单控件简洁版
asp.net jQuery Ajax用户登录功能的实现
asp.net SharpZipLib的压缩与解压问题
asp.net url重写后页面回传问题
asp.net与Discuz!NT整合集成实例教程
Discuz!NT 3与asp.net 整合的实例教程
测试控制台使用方法
.net 动态标题实现方法
asp.net *.ashx类型的文件使用说明

ASP.NET 中的 在VB.NET里操作文本文件


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 168 ::
收藏到网摘: n/a


在.NET里的System.IO.File和System.IO.FileInfo里的OpenText和AppenText等几个方法都是使用UTF-8编码操作文件的.这就导致如果操作不是使用UTF-8编码编写的文件时将会出现乱码现象!!!
解决方法就是对文本文件使用字节流操作,即不使用.NET里提供的OpenText和AppenText等几个方法,而是将文本当成二进制文件来操作,并且在操作时使用Encoding的方法进行相应的解码即可.实现代码如下:
打开文本文件:
Public Function LoadFile(ByVal FileName As String) as String
If FileName= "" Then
Return ""
End If
Try
Dim FileReader As FileStream = File.Open(FileName, FileMode.Open)
Dim FileByte(FileReader.Length) As Byte
FileReader.Read(FileByte, 0, FileReader.Length)
'转成系统对应的编码字符
Dim MyEncoder As Encoding = Encoding.Default
FileReader.Close()
FileReader = Nothing
Return New String(MyEncoder.GetChars(FileByte))
Catch e As Exception
Return ""
End Try
End Sub


保存文件:
Public Sub SaveToFile(ByRef Conten As String, ByVal FileName As String)
'/*将Conten字符串的内容写入FileName文件
If FileName = "" Then

Exit Sub
End If
Try
Dim FileToWrite As FileStream = File.Create(FileName)
Dim rByte() As Byte = Encoding.Default.GetBytes(Conten.ToCharArray)
FileToWrite.Write(rByte, 0, rByte.Length)
FileToWrite.Close()
FileToWrite = Nothing
Catch e As Exception
End Try
End Sub

使用上面二个方法即可实现使用当前系统对应的编码操作文本文件.可避免乱码的问题....