how to insert a record into table in unbound form

Hi everybody,
Thanks for every one who will try to help me.
Before I explain my problem, I should mention that I use stand alone Pc with MS Access 2002 without any other DB's ( Only MS access Tables ).
I have a small project that controls some office material issues to employees.
One of the form of that project includes  2 unbounds table. It excepts information about an employee and issues. The program saves data to an issues Table.
When I wrote the following module to insert data into the table and save it, I got the following Err message.   " User-defined type not defined "

The code I wrote is :

Private Sub Save_Issue_record()

Dim rst As DAO.Recordset                           ' The Err message points here
Dim dbs As Database
Dim strSQL As String

  strSQL = "Select * from issues;"
  Set dbs = CurrentDb
  Set rst = dbs.openrecordset(strSQL)

  With rst
    .AddNew
    ![employee_no] = Me!employee_no
    ![item_no] =  Me!item_no
     ……….
    '[last-Field] = Last-Field value
    .Update

End With
rst.Close
dbs.Close

End Sub
crown2005Asked:
Who is Participating?
 
arif_eqbalConnect With a Mentor Commented:
May be your References are not proper
use Project->References and add a reference to Microsoft DAO
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.