Thanks for help Alex but this is still causing a problem,
i need the records to automatically associate themselves
to the date. I can enter data onto the form and this
creates the record but i need to be able to click back
onto a specific date and it should show me the record for
that day.
Any help appreciated again.
Thanks
Subject: Re: Calender Control
From: "Alex Dybenko" <alex@PLEASE.cemi.NO.rssi.SPAM.ru>
Sent: 6/14/2004 5:10:00 AM
In Calendar Click event write:
docmd.GoToRecord ,,acNewRec
this will navigate form to new record

Signature
Alex Dybenko (MVP)
http://Alex.Dybenko.com
http://www.PointLtd.com
"K Crofts" <anonymous@discussions.microsoft.com> wrote in
message
news:1bdef01c45204$9c6c0c10$a301280a@phx.gbl...
> i have a data entry form that contains the calender
contol
> function on it. I need to be able to select a date on the
> calender and create a fresh data entry page for that date
> i.e. i need to achieve exactly the same function as the
> outlook calender. Is this possible?
> No newsgroups have been able to help with this so far, I
> am open to suggestions or alternatives?
> Thanks in advance.
Alex Dybenko - 15 Jun 2004 14:11 GMT
then you have to check first - if record exists for this date:
if isnull(dfirst("YourDateField","YourTable","YourDateField=#" & me.calendar
& "#") )
'no record. go to new record
docmd.GoToRecord ,,acNewRec
else
'position form on record with selected date
me.recordsetclone.findfirst "YourDateField=#" & me.calendar & "#"
if not me.recordsetclone.eof then
me.bookmark=me.recordsetclone.bookmark
end if
end if

Signature
Alex Dybenko (MVP)
http://Alex.Dybenko.com
http://www.PointLtd.com
> Thanks for help Alex but this is still causing a problem,
> i need the records to automatically associate themselves
[quoted text clipped - 24 lines]
> > am open to suggestions or alternatives?
> > Thanks in advance.