<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2722.900" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN class=969111120-15072003>I have
a form based calendar called the MiniCalendar. The last complete version
was built in Access 97. I used to have it on my website, but I have yet to
have any time to put it back on my new site. If you want, I can email you
a copy off list. (<A
href="mailto:dwutka@marlow.com">dwutka@marlow.com</A>). It's free to use,
and distribute, though the 'word doc' instructions were written for version 2
(latest version is 3), so it's a little off, but the MiniCalendar is pretty easy
to use.</SPAN></FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN
class=969111120-15072003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN class=969111120-15072003>I am
still working on Version 4, which is going to be for 2000 and up only (ran into
a few walls in 97 for features that I want incorporated).</SPAN></FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN
class=969111120-15072003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN
class=969111120-15072003>Anyhow, just give a holler if you want a copy of that
or not.</SPAN></FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN
class=969111120-15072003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2><SPAN
class=969111120-15072003>Drew</SPAN></FONT></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<DIV class=OutlookMessageHeader dir=ltr align=left><FONT face=Tahoma
size=2>-----Original Message-----<BR><B>From:</B> Backroads Data
[mailto:backroad@idir.net]<BR><B>Sent:</B> Tuesday, July 15, 2003 9:23
AM<BR><B>To:</B> AccessD<BR><B>Subject:</B> [AccessD] Using Calender Pop-up
(Date-selector) from ADH<BR><BR></FONT></DIV>
<DIV>Hi all -</DIV>
<DIV> </DIV>
<DIV>In Access97, I've used the pop-up calender / date-selector from Access97
Developer's Handbook (pp. 488-491) extensively throughout an
application. I've had reports from various users that the calendar will
quit working intermittantly for a while, then start to work again.
</DIV>
<DIV> </DIV>
<DIV>By "not working", they mean the calendar form appears, they can navigate
to any date, but when selecting a date the system fails to update
the date field (text box on the form) with the newly selected date. It
will be in this state for a while, then will begin working properly
again.</DIV>
<DIV> </DIV>
<DIV>Below is the code I'm using to call the calendar and update the date
field. Has anyone had any similar experience, or have any ideas what
might be happening? TIA.</DIV>
<DIV><BR>Private Sub dateStart_DblClick(Cancel As Integer)</DIV>
<DIV> </DIV>
<DIV> Dim dateNew As
Variant<BR> <BR>
Let dateNew = adhDoCalendar(Me.dateStart) 'get user's
selected date<BR>
<BR> If IsNull(dateNew)
Then 'user cancelled calendar
form<BR>
Exit Sub<BR>
Else<BR>
Me.dateStart = CDate(dateNew)<BR>
End If<BR></DIV>
<DIV>End Sub<BR></DIV>
<DIV>Best Regards,</DIV>
<DIV> </DIV>
<DIV>Julie Schwalm<BR>Backroads Data<BR><A
href="http://www.backroadsdata.com">www.backroadsdata.com</A><BR>785-594-6807</DIV></BLOCKQUOTE></BODY></HTML>