I have the tables dates and daysofweek. there is a rel. btwn dates.week and daysofweek.monday with ref int. enforced.
when I create new record and add a date in dates.week via the form with a daysofweek subform it creates a corresponding record in daysofweek as you would expect. However, when I do it in code using addnew it creates new record in dates but not in daysofweek . Here is my code
Dim db As DAO.Database
Dim rsDOW As DAO.Recordset
Dim dtSelweek As Date
Dim rsDates As DAO.Recordset
Set db = CurrentDb
Set rsDOW = db.OpenRecordset("select * from daysofweek", dbOpenDynaset)
Set rsDates = db.OpenRecordset("SELECT * from dates", dbOpenDynaset)
rsDOW.FindFirst "monday = #" & Me.selweek & "#"
If rsDOW.NoMatch Then
!Week = Me.selweek
.Bookmark = .LastModified
MsgBox "whoo hoo"
Thanks for any advice