如何在utf-8中保存文件？
Dim FSO, File
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set File = FSO.OpenTextFile(Path,2,true,-1)
File.Write(xml1)
File.Close
Set File = Nothing
Set FSO = Nothing