技术前线-绿色安全的源码下载站!
首 页文章资讯下载中心html颜色代码表
当前位置:技术前线文章资讯web技术ASP技术

ASP怎样读取文件和写文件

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2014-10-25 09:19:42

读取文件操作:

'-------------------------------------------------
'函数名称:ReadTextFile
'作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件
'----------------------------------------------------
Function ReadFromTextFile (FileUrl,CharSet)
    dim str
    set stm=server.CreateObject("adodb.stream")
    stm.Type=2 '以本模式读取
    stm.mode=3
    stm.charset=CharSet
    stm.open
    stm.loadfromfile server.MapPath(FileUrl)
    str=stm.readtext
    stm.Close
    set stm=nothing
    ReadFromTextFile=str
End Function

写文件操作:

'-------------------------------------------------
'函数名称:WriteToTextFile
'作用:利用AdoDb.Stream对象来写入UTF-8格式的文本文件
'----------------------------------------------------
Sub WriteToTextFile (FileUrl,byval Str,CharSet)
    set stm=server.CreateObject("adodb.stream")
    stm.Type=2 '以本模式读取
    stm.mode=3
    stm.charset=CharSet
    stm.open
        stm.WriteText str
    stm.SaveToFile server.MapPath(FileUrl),2
    stm.flush
    stm.Close
    set stm=nothing
End Sub

创建一个config.asp的文件

call WriteToTextFile("config.asp","谁是最可爱的人","utf-8")

Tags:ASP技术

作者:佚名
+1
-0

用户名: 查看更多评论

内 容:

         验证码:

所有源码和资料均为软件作者提供和网友推荐收集整理而来,仅供学习和研究使用。如有侵犯你版权的,请来信指出,本站将立即改正。

关于本站 | 网站帮助 | 广告合作 | 下载声明 | 友情连接 | 网站地图 | 资源sitemap | 文章sitemap

Copyright © 2014-2026 技术前线. All Rights Reserved .

Powered by:源码下载www.gaoitde.com 页面执行时间:10,437.50000 毫秒 建站时间:2014-09-28        网站备案:渝ICP备14007251号-1