BitcaWitch
New member
שלום, בנוגע ל-AddNew
יש לי את הקוד הבא שאמור להוסיף שורה לטבלת borrowing שבקובץ c:\library\library.mdb. מוצגת לי הודעת השגיאה 3251 "ערכת הרשומות הנוכחית אינה מאפשרת עדכון. יתכן שזוהי מגבלה של הספר או סוג הנעילה שנחבר". הקוד: Dim cn As ADODB.Connection Dim rsMain As ADODB.Recordset Set cn = New ADODB.Connection Set rsMain = New ADODB.Recordset cn.Open "Driver={Microsoft Access Driver .mdb)};Dbq=c:\library\library.mdb;" strSQL = "Select * From borrowing" rsMain.CursorType = adOpenKeyset rsMain.Open strSQL, borrowing, adOpenKeyset rsMain.AddNew rsMain.Fields(0) = whatever rsMain.Fields(1) = whatever rsMain.Fields(2) = whatever rsMain.Close אשמח אם תוכלו לעזור.
יש לי את הקוד הבא שאמור להוסיף שורה לטבלת borrowing שבקובץ c:\library\library.mdb. מוצגת לי הודעת השגיאה 3251 "ערכת הרשומות הנוכחית אינה מאפשרת עדכון. יתכן שזוהי מגבלה של הספר או סוג הנעילה שנחבר". הקוד: Dim cn As ADODB.Connection Dim rsMain As ADODB.Recordset Set cn = New ADODB.Connection Set rsMain = New ADODB.Recordset cn.Open "Driver={Microsoft Access Driver .mdb)};Dbq=c:\library\library.mdb;" strSQL = "Select * From borrowing" rsMain.CursorType = adOpenKeyset rsMain.Open strSQL, borrowing, adOpenKeyset rsMain.AddNew rsMain.Fields(0) = whatever rsMain.Fields(1) = whatever rsMain.Fields(2) = whatever rsMain.Close אשמח אם תוכלו לעזור.
