I would like to request the date of birth in a registration form. Unfortunately, entries older than 1 January 1970 are not permitted, which seems a bit strange to me in connection with modern web technology.
Is there a workaround?
Code: Select all
If OpenWindow(0, 0, 0, 200, 250, "DateGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
DateGadget(0, 10, 10, 180, 25, "%mm/%dd/%yyyy")
SetGadgetState(0, Date(1970, 1, 1, 1, 1, 1))
EndIf