为什么我生成的xml文件是乱码

Question

偶编程水平烂，Oracle自己有生成XML的工具包.....

Answer 1

Private Sub Form_Load()    Set gCn = New ADODB.Connection
    gCn.CursorLocation = adUseClient
    gCn.Mode = adModeReadWrite
    gCn.ConnectionString = "PROVIDER=MSDataShape;Data PROVIDER=MSDASQL;dsn=dl;uid=xxx;pwd=xxx;"
    gCn.Open
    
   Dim sqlstr As String
   Dim rs As New ADODB.Recordset
    sql = "select * from table"
    
    Set rs = New ADODB.Recordset
    With rs
        .ActiveConnection = gCn
        .CursorLocation = adUseServer
        .CursorType = adOpenStatic
        .LockType = adLockOptimistic
        .Open sql
        .Save "c:\1.xml", adPersistXML
    End With
End Sub不是乱码

Answer 2

去掉
<?xml version=""1.0"" encoding=""ISO-8869-1""?>"