this code not work Is there a problem
-----------------
code
-----------------
Private Sub S_Click()
If (AA - BB) = 0 Then
Else
MsgBox "ÚÝÜÜæÇð ... ÇáÞíÜÜÜÜÏ ÛÜÜíÑ ãÊÜÜÜæÇÒä", , "ÇáãÈÑãÜÜÜÜÜÜÌ"
Exit Sub
End If
CurrentDb.Execute ("Insert into TransActions select * from TransActions1")...
when i convert my access batabase from access 2003 to access 2007
from mdb to accdb
i receved error in this code part
-------------
code
-------------
Private Sub ACCID_BeforeUpdate(Cancel As Integer)
Set Q1 = CurrentDb.OpenRecordset("select * from Accounts where AccId = '" & AccID &...
when i convert my access batabase from access 2003 to access 2007
i receved error in this code part
-------------
code
-------------
Private Sub ACCID_BeforeUpdate(Cancel As Integer)
Set Q1 = CurrentDb.OpenRecordset("select * from Accounts where AccId = '" & AccID & "'")
If...