写入文本文件的过程函数(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.不能自动建立目录

赞 (0)

相关推荐

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

    今天写程序的时候要反复用到写入文本文件,于是就写了一个过程函数,希望对大家有用. 代码: 复制代码 代码如下: Sub Write2File(strFile, strContent, blnAppend) ' 写入文件  ' strFile 文件名(路径) , strContent 写入的内容, blnAppend 是否追加          On Error Resume Next          Set objFSO = Server.CreateObject("Scripting.Fil

  • JavaScript使用FileSystemObject对象写入文本文件内容的方法

    JavaScript使用FileSystemObject对象写入文本文件内容的方法

    本文实例讲述了JavaScript使用FileSystemObject对象写入文本文件内容的方法.分享给大家供大家参考.具体如下: 这段代码主要是练习JavaScript的FileSystemObject对象,用它来让JavaScript向一个文本文件中写入内容,这个TXT文件的路径你可以自己指定,然后定义好要写入的内容,运行代码,你会发现原来的TXT文本中的内容已改变. 运行效果如下图所示: 具体代码如下: <html> <head> <title>写入文本文件<

  • C#实现写入文本文件内容的方法

    本文实例讲述了C#实现写入文本文件内容的方法.分享给大家供大家参考.具体如下: private void write_txt(string str1, string str2, string str3) { System.DateTime currentTime = System.DateTime.Now; string strYMD = currentTime.ToString("d"); string FILE_NAME = "MyFileSend" + str

  • C#实现将日志写入文本文件的方法

    本文实例讲述了C#实现将日志写入文本文件的方法.分享给大家供大家参考.具体如下: 这里传入的参数是 要写的内容 using System.IO; public static void WriteLog(string strLog) { string sFilePath="d:\\"+DateTime.Now.ToString("yyyyMM"); string sFileName = "rizhi" + DateTime.Now.ToString

  • Java将字符串写入文本文件代码示例

    一.Filewriter与File---将字符串写入文本文件 public static void main(String[] args) { File f=new File("C:\\world.txt");//新建一个文件对象,如果不存在则创建一个该文件 FileWriter fw; try { fw=new FileWriter(f); String str="hello world"; fw.write(str);//将字符串写入到指定的路径下的文件中 fw

  • asp.net读取模版并写入文本文件

    asp.net读取模版并写入文本文件

    本文要介绍的是ASP.NET怎样读写文本文件,但更重要的是实现的过程.使用的工具是Visual Studio 2015 ,.NET版本是4.6.1 .一共建立的2个项目,HoverTreePanel和HoverTreeWeb,都是ASP.NET项目.文章末尾附源码下载. 项目结果如下图: 读写文件功能在HoverTreePanel项目里面实现,其中HoverTreeTemplate.html文件为模版,程序将会读取这个文件的内容,然后把模版中的[HoverTreeText/]替换成输入的内容,把

  • asp 通用数据库连接过程函数

    <% '****************************** '函数:ConnectionMssql(ConnStr) '参数:ConnStr,数据库连接代码 '作者:阿里西西 '日期:2007/7/13 '描述:通用数据库连接过程 '示例:<%=ConnectionMssql("Provider = Microsoft.Jet.OLEDB.4.0;Data Source = test.mdb")%> '****************************

  • vbs操作txt文本文件常用方法与函数代码

    'creat by 席飞剑(小席老师) '操作文本文件,操作fso对象(文件对象操作) 函数代码 创建文件 dim fso, f set fso = server.CreateObject("Scripting.FileSystemObject") set f = fso.CreateTextFile("C:\test.txt", true) '第二个参数表示目标文件存在时是否覆盖 f.Write("写入内容") f.WriteLine(&quo

  • Qt5实现qDebug日志信息写入日志文件过程

    Qt5实现qDebug日志信息写入日志文件过程

    目录 1.思路 2.代码 3.问题 4.结果与扩展思路 1.思路 其实Qt提供了将日志写入文件的方式,是以接口的形式提供的,我们只需要按照我们的需求完成回调函数和我们自己的接口即可. 为方便调用,我们一般直接写到log.h中即可. 1.创建log.h 2.根据我们自己的需求完成回调函数 3.根据需求封装外部调用函数并注册回调函数 2.代码 我这里按照我的需求,当接口传递日志文件名和等级时使用传递的文件存储日志,否则以精确到当前时间为文件名创建日志文件. 提供给外部的调用函数包含日志文件名和日志等

  • 判断Email地址是否正确的几个函数(asp/php/javascript)

    用js判断 复制代码 代码如下: function is_email( str ){ p = /^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z\.]+)$/; if(str.search(p) == -1){ return false; }else{ return true; } } 用PHP判断 复制代码 代码如下: function is_email($email){ $pattern="/^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z

随机推荐