Private Sub cmdAddCart_Click()
Module1.toConnectProc
Set globRSRecordset2 = New ADODB.Recordset
globRSRecordset2.Open "SELECT * FROM tblBooks, tblTemporary WHERE tblBooks.Title = '" & Trim(Me.txtTitle) & "'", strVar, adOpenKeyset, adLockOptimistic
With globRSRecordset2
.AddNew
tblBooks.ISBN = tblTemporary.ISBN
tblTemporary.UserID = ID
!DateReserve = Date
!Notes = "Fair"
MsgBox "Added to Cart", vbInformation, "Add to Cart"
.Close
End With
I get ang error of "object required" on tblBooks.ISBN = tblTemporary.ISBN