AFTER CLOSING A DAO TABLE. CAN'T UPDATE AGAIN?

From: Stu at Informed (stu_at_informed.com)
Date: 07/13/04

  • Next message: Oracle of Delphi: "Compressed protocol" 
    Date: Tue, 13 Jul 2004 09:01:03 -0700

    Using the following code find that can add records and fill them until the table is closed. Then "Updatable" becomes false and .Addnew generates error 3027 "Can't Update. Database or object is read-only."
        Dim Adb As Database
        Dim Atb As Table
           Set Adb = OpenDatabase("F:\pdplus", False, False, "FoxPro 3.0;")
           Set Atb = Adb.OpenTable("Adminlog")
           t = Atb.Updatable
           MsgBox "Atb is updatable " & t
           Atb.AddNew
           'Atb.Edit
           Atb.Fields("User") = SUserId
           Atb.Fields("time") = Stime
           Atb.Fields("Date") = SDate
           Atb.Update
           

  • Next message: Oracle of Delphi: "Compressed protocol"