Unhide a hidden field at the months end

[moles]

Currently I have created a form where a user will enter specific data concerning the upkeep of our systems. The system password needs to be updated at the end of the month. Currently I have a text box hidden, I want this box to appear at the end of the month. Any sugestions

 

[thornmastr]

Place the following function either at the top of your form module so it will be global to the form, or place it in a global module:


Public Function fLastofMonth() As Date
Dim nextdate As Date

nextdate = Month(Date) + 1 & "/" & Year(Date)
fLastofMonth = DateAdd("d", -1, nextdate)

End Function


Since I assume you want to test for the end of month for every record, include the following. This is of course air code which you will modify to meet your requirements

if flastofmonth = date() then
my_hidden_variable.visible = true
end if Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com

 

[WildHare]

The only problem I see with this is that if the last day of the month falls on a non-working day, the test will never evaluate to true. Who wants to come in to work on a Sunday just to open a database? ... LOL

The only way to accurately do this sort of thing is to STORE, in a table, the last date the password was changed. Then, in whatever manner you want, and wherever you want, compare the MONTH AND YEAR of that date, to the CURRENT MONTH AND YEAR. If table date is LESS THAN, you need to change the password. Then update the table date.

You need to check Month AND YEAR, because January is less than December, remember?

If Month(lastChangeDate) < Month(Date())
or (Month(LastChangeDate) > Month(Date()) and Year(LastChangeDate) < Year(Date()) )
Then
{ Update your password here}
{ Update the LastChangeDate here}
Else
{ just go on about your bidness..}
End if

There are other ways to check if Now is January and THEN was December, but you get the drift....

Jim
How many of you believe in telekinesis? Raise my hand...
Another free Access forum:

http://www.forumco.com/jmhare

More Access stuff at

http://www.jmhare.com/wildhare2.htm

 

[thornmastr]

Point taken. Of course, you could check for Friday and see if Monday was next month. And let's not forget holidays falling around the end of month.

Just how complicated would he like to make this task? Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com

 

[WildHare]

Ahhh.. well, that's an answer only our friend MOLES can provide.

I myself prefer the &quot;mark the first day on your bloody calendar and fix it yourself&quot; method...LOL

Jim How many of you believe in telekinesis? Raise my hand...
Another free Access forum:

http://www.forumco.com/jmhare

More Access stuff at

http://www.jmhare.com/wildhare2.htm