asp无人接到net请求解决
1. <!--#include file= "conn.asp "-->
<%codepage=936%>
<%
Response.ContentType= "text/xml "
'response.expires=0
Response.Write( " <?xml version= '1.0 ' encoding= 'GB2312 '?> ")
sqlr = "select * from stu "
rs.Open sqlr,conn,3,2
rs.save server.mappath( "aaa.xml "),adPersistXML
%>
现在问题时aaa.xml显示是乱码，也没有查到解决办法？
请问该如何解决呢？谢谢

2.Function LoadFile(ByVal File)
Dim objStream
On Error Resume Next
Set objStream = Server.CreateObject( "ADODB.Stream ")
With objStream
.Type = 2
.Mode = 3
.Open
.LoadFromFile Server.MapPath(File)
.Charset = "GB2312 "
.Position =.size
.writetext "xulei ",adwriteline
.Position =2
response.write( .ReadText)
response.write( .size)
.SaveToFile Server.MapPath(File),2

.Close
End With
Set objStream = Nothing
End Function
保存的全是乱码请问如何处理

[解决办法]
第一个不会
第二个这样写
With objStream
.Type =2
.Mode = 3
.Open
.Position=0
.Charset = "GB2312 "
.LoadFromFile Server.MapPath(File)
response.flush