用ADODB.Stream代替FSO读取/写入文本文件
作者:Maco 时间:2008-01-31 12:19:00
昨天我问过这个问题怎么用ADODB.Stream来读取或写入文件,而不是用fso,不过没人回答到点上,今天搞定了.贴出来给觉得有用的朋友,希望其他朋友不用走弯路.
读取文件内容.
Function LoadFile(ByVal File)
Dim objStream
On Error Resume Next
Set objStream = Server.CreateObject("ADODB.Stream")
If Err.Number=-2147221005 Then
Response.Write "<div align='center'>非常遗憾,您的主机不支持ADODB.Stream,不能使用本程序</div>"
Err.Clear
Response.End
End If
With objStream
.Type = 2
.Mode = 3
.Open
.LoadFromFile Server.MapPath(File)
If Err.Number<>0 Then
Response.Write "<div align='center'>文件<font color='#ff0000'>"&File&"</font>无法被打开,请检查是否存在!</font></div>"
Err.Clear
Response.End
End If
.Charset = "GB2312"
.Position = 2
LoadFile = .ReadText
.Close
End With
Set objStream = Nothing
End Function
存储内容到文件代码:
Sub SaveToFile(ByVal strBody,ByVal File)
Dim objStream
On Error Resume Next
Set objStream = Server.CreateObject("ADODB.Stream")
If Err.Number=-2147221005 Then
Response.Write "<div align='center'>非常遗憾,您的主机不支持ADODB.Stream,不能使用本程序</div>"
Err.Clear
Response.End
End If
With objStream
.Type = 2
.Open
.Charset = "GB2312"
.Position = objStream.Size
.WriteText = strBody
.SaveToFile Server.MapPath(File),2
.Close
End With
Set objStream = Nothing
End Sub
比起fso来使用ADODB.Stream的方法还是有优势的,起码它支持对文件编码的设置。
标签:Stream,ADODB,FSO,文件
0
投稿
猜你喜欢
JavaScript中 this 指向问题深度解析
2024-05-03 15:04:14
PHP实现图片合并的示例详解
2023-06-08 14:14:07
Python实现变声器功能(萝莉音御姐音)
2023-04-12 23:04:16
Oracle数据库索引的维护
2010-07-26 13:29:00
ASP CacheControl 属性
2009-04-28 13:09:00
Vue学习之路之登录注册实例代码
2024-04-27 16:08:32
Python if else条件语句形式详解
2021-09-21 06:48:24
VsCode中ctrl+s后会在当前目录下自动生成dist目录的方法
2023-04-25 09:19:41
zeroclipboard 单个复制按钮和多个复制按钮的实现方法
2024-04-22 13:02:59
Python实现图片拼接的代码
2023-05-30 15:13:42
python 两个一样的字符串用==结果为false问题的解决
2023-01-24 08:30:59
python+selenium实现163邮箱自动登陆的方法
2021-01-24 08:05:15
详解Python爬取并下载《电影天堂》3千多部电影
2023-07-07 23:48:24
python模块和包的应用BASE_PATH使用解析
2021-04-15 09:46:36
SQL 2008 FileStream数据类型
2008-10-28 21:07:00
asp随机数 随机产生N位由数字和字母组成的密码
2011-03-10 10:47:00
Python实现Canny及Hough算法代码实例解析
2022-10-15 14:23:37
详解nodejs express下使用redis管理session
2024-05-11 09:51:40
golang json性能分析详解
2024-05-09 14:57:46
利用Vscode进行Python开发环境配置的步骤
2023-04-18 09:06:46