ASP生成UTF-8编码的代码

方法一：createtextfile生成文件方法

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生成文件方法
    set ccobjstream = server.createobject("adodb.stream")
    with ccobjstream
    .type = 2
    .mode = 3
    .open
    .charset = "utf-8"
    .position = ccobjstream.size
    .writetext 要生成的内容
    .savetofile 要生成文件路径和文件名,2
    .close
    end with

  createtextfile   方法   
  创建指定文件并返回   textstream   对象，该对象可用于读或写创建的文件。   

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

  参数   
  object   

  必选项。应为   filesystemobject   或   folder   对象的名称。   

  filename   

  必选项。字符串表达式，指明要创建的文件。   

  overwrite   

  可选项。boolean   值指明是否可以覆盖现有文件。如果可覆盖文件，该值为   true；如果不能覆盖文件，则该值为   false   。如果省略该值，则不能覆盖现有文件。   

  unicode   

  可选项。boolean   值指明是否以   unicode   或   ascii   文件格式创建文件。如果以   unicode   文件格式创建文件，则该值为   true；如果以   ascii   文件格式创建文件，则该值为   false。如果省略此部分，则假定创建   ascii   文件。