写入文本文件的过程函数(ASP)

发布时间:2022-04-17 发布网站:脚本宝典
脚本宝典收集整理的这篇文章主要介绍了写入文本文件的过程函数(ASP)脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。

今天写程序的时候要反复用到写入文本文件,于是就写了一个过程函数,希望对大家有用.

代码:

Sub Write2File(strFile, strContent, blnAppend)
' 写入文件
' strFile 文件名(路径) , strContent 写入的内容, blnAppend 是否追加
        On Error Resume Next
        Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
        If blnAppend Then
                Set objWriteText = objFSO.OpenTextFile(strFile,8,True)
        Else
                Set objWriteText = objFSO.OpenTextFile(strFile,2,True)
        End If
        objWriteText.WriteLine (strContent)
        Set objWriteText = Nothing
        Set objFSO = Nothing
        ' 容错处理
        Select Case Err
                Case 424 Response.Write "路径未找到或者该目录没有写入权限."
'                Case Else Response.Write Err.Description
                Case Else Response.Write Err
        End Select
End Sub 

调用方法:
Write2File "c:\dd.ini", "dd", True
或者
Call Write2File ("c:\dd.ini", "dd", True)

说明:
1.自动建立文件;
2.不能自动建立目录

脚本宝典总结

以上是脚本宝典为你收集整理的写入文本文件的过程函数(ASP)全部内容,希望文章能够帮你解决写入文本文件的过程函数(ASP)所遇到的问题。

如果觉得脚本宝典网站内容还不错,欢迎将脚本宝典推荐好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: