Function WriteFile(filepath,str,fCharset) '写文件
adSaveCreateOverWrite = 2
adSaveCreateNotExist = 1
Set stm = Server.Createobject("Adodb.Stream")
stm.Charset = fCharset
stm.Open
stm.WriteText str
stm.SaveToFile filepath,adSaveCreateOverWrite
WriteFile=True
stm.close
set stm = nothing
End Function
Function ReadFile(filepath,fCharset) '读文件
Dim stm2
Set stm2 =server.createobject("ADODB.Stream")
stm2.Charset = fCharset
stm2.Open
stm2.LoadFromFile filepath
ReadFile=Null
ReadFile = stm2.ReadText
set stm2 = nothing
End Function 

本文介绍了使用 ASP.NET 中 Adodb.Stream 对象进行文件的读取与写入操作的方法。通过两个函数实现了文件写入及读取的功能,并详细展示了如何设置字符集、打开流、写入或读取文本以及关闭流等步骤。
1711

被折叠的 条评论
为什么被折叠?



