asp createTextFile生成文本文件支持utf8

在ASP开发中，文件操作是绕不开的基础技能。很多时候，我们都需要把一段文本保存成服务器上的文件，比如生成静态页面、记录日志、导出数据等等。虽然ASP内置了CreateTextFile方法，但直接用它处理UTF-8编码时，会遇到一些让人头疼的问题。下面就来聊聊两种常见的解决方案，以及如何把它们封装成一个好用的通用函数。

自定义文本文件生成函数

先看一个实际能用的函数。它支持同时处理GBK和UTF-8两种编码，并且会自动创建目录，还会在出错时给出友好提示。代码里主要做了几件事：

• 转换路径格式，统一用斜杠
• 自动补全字符集参数
• 根据编码类型选择不同的写入方式（UTF-8用ADODB.Stream，其他用FSO）
• 失败时输出错误信息并跳转

Function createTextFile(Byval content, Byval fileDir, Byval code)
    dim fileobj, fileCode
    fileDir = replace(fileDir, "\", "/")
    if isNul(code) then fileCode = Charset else fileCode = code
    call createfolder(fileDir, "filedir")
    if fileCode = "utf-8" then
        on error resume next
        With objStream
            .Charset = fileCode
            .Type = 2
            .Mode = 3
            .Open
            .Position = 0
            .WriteText content
            .Sa veToFile Server.MapPath(fileDir), 2
            .Close
        End With
    else
        on error resume next
        err.clear
        set fileobj = objFso.CreateTextFile(server.mappath(fileDir), True)
        fileobj.Write(content)
        set fileobj = nothing
    end if
    if Err Then 
        err.clear
        createTextFile = false
        errid = err.number
        errdes = err.description
        Err.Clear
        echoErr err_09, errid, errdes
    else 
        createTextFile = true
    End Function

这个函数用起来很简单，传递内容、路径和编码即可。比如：

createTextFile "内容", "/article/11/22/3.htm", ""

ASP生成UTF-8编码的两种方法

如果只想生成UTF-8文件，有两个经典方法可以选择。第一种基于FSO的CreateTextFile，但注意第三个参数设为True才能覆盖已有文件：

function WriteToFile(FileName, FileContent)
    set fso = server.createobject("scripting.filesystemobject")
    set fp = fso.createtextfile(server.mappath(FileName), , True)
    fp.write(FileContent)
end function

第二种则用ADODB.Stream，它天然支持Unicode编码，写出来的文件就是标准的UTF-8：

Set ccObjStream = Server.CreateObject("ADODB.Stream")
With ccObjStream
    .Type = 2
    .Mode = 3
    .Open
    .Charset = "utf-8"
    .Position = ccObjStream.Size
    .WriteText 要生成的内容
    .Sa veToFile 要生成文件路径和文件名, 2
    .Close
End With

这两种方法各有适用场景——第一种简洁直观，第二种更可靠、兼容性更好。最上面的createTextFile函数其实已经把两者都整合进去了，按需调用即可。

CreateTextFile 方法详解

最后单独说说CreateTextFile本身。它是FSO对象的一个方法，用于创建文本文件并返回一个TextStream对象。语法如下：

object.CreateTextFile(filename[, overwrite[, unicode]])

参数说明：

• filename（必选）：要创建文件的路径。
• overwrite（可选）：布尔值，True表示覆盖已有文件，False或省略则不能覆盖。
• unicode（可选）：布尔值，True表示创建Unicode格式文件，False或省略则创建ASCII格式。

需要注意的是，第三个参数unicode控制的是文件内部编码（Unicode vs ASCII），并不是直接对应UTF-8。想要生成UTF-8文件，还是推荐用ADODB.Stream方法更稳妥。

以上就是ASP中生成文本文件并支持UTF-8编码的实用技巧。无论是自己封装函数，还是直接调用两种底层方法，都能满足日常开发需求。希望这些代码能在你的项目中派上用场。