allen brownes Calendar

Dreamweaver

Well-known member
Local time
Today, 23:33
Joined
Nov 28, 2005
Messages
2,462
Has anybody got a copy of the 2000+ version of allen brownes Calendar As the link is broken And want to use it as the one I have I am unable to include with my example because of the copyright issues



http://allenbrowne.com/ser-51.html
 
copyright with ms access?
if you get it from public forums, and was freely shared, its public domain.
 
If you want I can email Allen and let him know. Although he no longer updates his website I expect he would fix a broken link.
Alternatively you could use my Better Date Picker which is very similar and more up to date. Can’t provide a link as I’m on my phone but it’s in sample databases and on my website


Sent from my iPhone using Tapatalk
 
copyright with ms access?
if you get it from public forums, and was freely shared, its public domain.
No I got it from a book


Edit:
' From Access 2000 Developer's Handbook, Volume I
' by Getz, Litwin, and Gilbert (Sybex)
' Copyright 1999. All rights reserved.
 
Last edited:
If you want I can email Allen and let him know. Although he no longer updates his website I expect he would fix a broken link.
Alternatively you could use my Better Date Picker which is very similar and more up to date. Can’t provide a link as I’m on my phone but it’s in sample databases and on my website


Sent from my iPhone using Tapatalk


I have downloaded it and am trying it I might have to resize it and can it work with your code to open in fixed place Only just added it so haven't had time for a detailed look.
 
the code is yours and everyone else that buys the book.
they made the book for the public.

in respect, just mention where you get the source code and the original coder.

i believe in free code. you don't keep it to yourself and die with it.
you let the code live. exposed it. pass it to the next generation. share it so others may benefit.
 
Found One that does everything I want.


Its One of Peter Hibbs Who does some very nice work It acts just like the system one but has year and month selection plus opens under the opening control Thing is I only need it for 2 date controls on the employees screen that peter Built as part of the holiday planner I updated In the example


attachment.php



Thanks to all who helped


mick
 

Attachments

  • 2019-08-20 (5).png
    2019-08-20 (5).png
    13.2 KB · Views: 477
Thing I like about peters tools they are so easy to use took me 2 mins love the look And he always includs a good guide for those who are still new to access.



attachment.php
 

Attachments

  • 2019-08-20 (6).png
    2019-08-20 (6).png
    61.6 KB · Views: 458
Thing I like about peters tools they are so easy to use took me 2 mins love the look And he always includs a good guide for those who are still new to access.

Yes I agree. Peter Hibbs has created some excellent example apps and his help files are outstanding. Highly recommended.
Best of all probably are his Flexgrid examples. Unfortunately they don't work in 64-bit Access
 
I need to update it for 64 bit but think I can work it out if not I know where to come lol
 
Just updated all his APIcalls to 64 bit can somebody check them as I only have a 32 bit system.


Code:
'Store rectangle coordinates.
Public Type FormCoords
    lngX1 As Long
    lngY1 As Long
    lngX2 As Long
    lngY2 As Long
End Type

#If VBA7 Then 'use PtrSafe & LongPtr
Declare PtrSafe Sub GetWindowRect Lib "user32" (ByVal hWnd As LongPtr, lpRect As FormCoords)
Declare PtrSafe Function GetDC Lib "user32" (ByVal hWnd As LongPtr) As LongPtr
Declare PtrSafe Function ReleaseDC Lib "user32" (ByVal hWnd As LongPtr, ByVal hDC As LongPtr) As Long
Declare PtrSafe Function GetDeviceCaps Lib "gdi32" (ByVal hDC As LongPtr, ByVal nIndex As Long) As Long
Declare PtrSafe Function apiSystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, _
                    ByVal uParam As Long, lpvParam As RECT, ByVal fuWinIni As Long) As Long
#Else
'API Declarations
Declare Sub GetWindowRect Lib "user32" (ByVal hWnd As Long, lpRect As FormCoords)
Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As Long
Declare Function ReleaseDC Lib "user32" (ByVal hWnd As Long, ByVal hDC As Long) As Long
Declare Function GetDeviceCaps Lib "gdi32" (ByVal hDC As Long, ByVal nIndex As Long) As Long

Declare Function apiSystemParametersInfo Lib "user32" _
Alias "SystemParametersInfoA" (ByVal uAction As Long, _
ByVal uParam As Long, lpvParam As RECT, ByVal fuWinIni As Long) As Long

#End If
Public Const SPI_GETWORKAREA = 48

'Store for usable area of screen (see frmCalendar code)
Public Type RECT
    vLeft As Long
    vTop As Long
    vRight As Long
    vBottom As Long
End Type


I did find most on WIKE API Except
apiSystemParametersInfo
I will post the topic on utteraccess where I found the calendar for others thanks
mick
 
I can't check them at the moment as I'm on a tablet.
You could have saved a lot of time and effort by using another date picker with no API declarations so no conversion needed...;)
 
I can't check them at the moment as I'm on a tablet.
You could have saved a lot of time and effort by using another date picker with no API declarations so no conversion needed...;)
Lol but it ticked all my little boxes lol
 

Users who are viewing this thread

Back
Top Bottom