
<!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.2800.1106" name=GENERATOR>

<STYLE></STYLE>

</HEAD>

<BODY bgColor=#ffffff>

<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></BODY></HTML>