[AccessD] Using Calender Pop-up (Date-selector) from ADH

Drew, right now I use an Access app for scheduling, but also duplicate a task list in Outlook because I love the calendar layout. Do you think your MiniCalendar could reproduce that in my Access app? All I really want is to print tasks on the appropriate day and print out a "calendar" page. It's a nuisance to have to use both and I just haven't made the time to take a hand at doing it myself in Access. 

Susan H. 


  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.  (dwutka at marlow.com).  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.

  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).

  Anyhow, just give a holler if you want a copy of that or not.

  Drew
    -----Original Message-----
    From: Backroads Data [mailto:backroad at idir.net]
    Sent: Tuesday, July 15, 2003 9:23 AM
    To: AccessD
    Subject: [AccessD] Using Calender Pop-up (Date-selector) from ADH


    Hi all -

    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.  

    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.

    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.

    Private Sub dateStart_DblClick(Cancel As Integer)

        Dim dateNew As Variant
        
            Let dateNew = adhDoCalendar(Me.dateStart)    'get user's selected date
            
            If IsNull(dateNew) Then         'user cancelled calendar form
                Exit Sub
            Else
                Me.dateStart = CDate(dateNew)
            End If

    End Sub

    Best Regards,

    Julie Schwalm
    Backroads Data
    www.backroadsdata.com
    785-594-6807


------------------------------------------------------------------------------


  _______________________________________________
  AccessD mailing list
  AccessD at databaseadvisors.com
  http://databaseadvisors.com/mailman/listinfo/accessd
  Website: http://www.databaseadvisors.com

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030715/34c2e305/attachment-0001.html>