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   檔案。