Object missing when trying to use the after add event for adding to an

I need to add a record into another table as well as the one that a form normally does. I used the function for this in events. I edited the supplied code as follows but I get "Microsoft VBScript runtime error '800a01a8' Object required: 'dal.Table(...)'" when I try to submit the form. Below is the code as I edited it. "BCShells" is the second database that I want the data entered into. Then the fields on the left are the fielkds in "BCShells" and the fields on the right are the fields in the form.
set dal_table=dal.Table("BCShells")

dal_table.EntryFirstName="OrderFirstName"

dal_table.EntryLastName="OrderLastName"

dal_table.EntryEmail="OrderEmail"

dal_table.Qty="Quantity"

dal_table.Add()