不要用fso来写静态页面，用adodb.stream --unicode编码问题

Set objStream = Server.CreateObject("ADODB.Stream")
    With objStream
    .Open
    .Charset = "utf-8"' //编码，这里你可以改成任何编码
    .Position = objStream.Size
    .WriteText=txt' //模版+数据
    .SaveToFile server.mappath("../../C22.js"),2' //生成文件路径
    .Close
    End With
Set objStream = Nothing 

ok了~~汉字 韩国字 曰本字 等等，传说加上火星语都不会乱码