在用自己编写的Access控制程序中对数据库进行写操作,有时侯一次写入大批数据,结果会出像很多空行,是为什么？

Question

我在用自己编写的Access(MDB)数据库控制程序中对数据库进行写操作,有时侯如一次写入大批量数据,结果会出像很多空行,但程序并没有引发任何错误,这是为什么？下面是我写的程序：Private Mdb As Database, Mdb2 As Recordset, MdbChange As Field, MdbChange3 As TableDefPublic Function WriteAccess(FileName As String, Username As String, ByVal Password As String, TableName As String, RecordNumber As Long, _
                            FieldNumber As Long, DataMain As Variant, Optional IsError As Boolean = False) As Boolean
    Password = ";PWD=" & Trim(Password)
    On Error GoTo ErrCL
    Set Mdb = OpenDatabase(FileName, False, False, Password)
    Set Mdb2 = Mdb.OpenRecordset(TableName)
    If IsError = True Then
       If RecordNumber > Mdb2.RecordCount Or FieldNumber > Mdb2.Fields.Count Then
          WriteAccess = False
          Mdb2.Close
          Mdb.Close
          Exit Function
       End If
    End If
    Call Mdb2.MoveFirst
    Call Mdb2.Move(RecordNumber)
    Mdb2.Edit
    Mdb2(FieldNumber) = DataMain
    Mdb2.Update
    Mdb2.Close
    Mdb.Close
    WriteAccess = True
    Exit Function
ErrCL:
    If Err.Number = 3050 Then
       Resume
    End If
    Exit Function
End Function

Answer 1

哎，不知道你的代码想执行什么操作? 两个建议:
  1. 改用 ADO控件(ado15.dll)，使用adodb.recordset.updatebatch方法，可以
     实现批量更新;  2. 直接使用database.execute方法，效率比用recordset.update高
     很多。