用Adodb.Stream的SaveToFile方法怎么指定文件的编码为utf-8
sql   =   "select   data   from   DataUpLoad "
Set   query   =   conn.Execute(sql)
Set   strxml   =   Server.CreateObject( "Adodb.Stream ")
query.save   strxml
strxml.SaveToFile   "C:\test.xml ",2


如何让保存的xml文件编码为utf-8

------解决方案--------------------
query.save strxml, 2
------解决方案--------------------
strxml.Type = 2
------解决方案--------------------
.charset
------解决方案--------------------
<%@CODEPAGE= "65001 "%>
<%
Session.CodePage= 65001
Response.Charset= "UTF-8 "
%>
最前面加
------解决方案--------------------
strxml.charset= 'UTF-8 '