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