Excel使用ADO方式访问，添加新记录的问题。

Question

定义了rsExcel,sConn等变量，我使用了AddNew方法往一个空的excel文件中添加新的记录，不会，请大家指教，谢谢。（附代码，各位帮帮看看，问题在哪儿？）
Set rsExcel = New ADODB.Recordset
rsExcel.CursorLocation = adUseClient
rsExcel.CursorType = adOpenKeyset
rsExcel.LockType = adLockBatchOptimisticsConn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=" & str1App2FileName
rsExcel.Open "SELECT * FROM [sheet1$]", sConn'rsExcel.MoveLastFor i = 1 To SecFileCount
    rsExcel.AddNew
    rsExcel.Fields(0).Value = SecFilePoint(i).streDnaAllName
    rsExcel.Fields(1).Value = SecFilePoint(i).strOPCName
    rsExcel.Fields(2).Value = SecFilePoint(i).strCNRe
    rsExcel.Fields(3).Value = SecFilePoint(i).strENRe
    rsExcel.Update
    
        Debug.Print rsExcel(0) & "  " & rsExcel(1) & "   " & rsExcel(2) & "   " & rsExcel(3)
    rsExcel.MoveNext
Next i

Answer 1

我找到答案了，错误发生在往新的Excel文件中添加记录的时候，col只有默认的一个，所以要先添加col然后才能添加数据。