Create an Alert Box in Access

[W. Carroll]

Hi,
Here is the problem I am facing. I need to create some sort of
message alert that notifies the user upon opening the database that
there are records within 30 days of expiration. I'm not sure if this
requires a Macro, event procedure, etc. I have a field that gives the
expiration date so I could use a formula that calculates 30 days out,
or I also have a field that calculates the number of days to
expiration. I'm not sure exactly where to start to tackle this
problem. I do have Access experience, but never with this type of
problem, so I'm sort of in unfamliar territory. So again, my main
problem is that I just need to for the message box to alert the user
upon opening the database. If anyone has any advice, I'd greatly
appreciate it.

[ColinWard]

Hi there.

Try this url to get you started:

http://msdn.microsoft.com/library/de.../en-us/vbenlr9
8/html/vafctdateadd.asp

and also the msgbox function here:
http://msdn.microsoft.com/library/de.../en-us/vbenlr9
8/html/vafctdateadd.asp

hope this helps

Colin
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[MissiMaths]

You could do it in vb? I am not sure how to get it to execute
automatically upon opening, unless you attach it to the end to a form
button or something but using DAO, you could search the field in the
table

Dim MyDB As Database
Dim MyRecs As DAO.Recordset

Set MyDb = CurrentDb()
Set MyRecs = MyDb.OpenRecordset(tableName, DB_OPEN_TABLE)

MyRecs.MoveFirst
For i = 1 To recordNumber
If (DateValue(Date)-DateValue(MyRecs!DateField)<30) Then
MsgBox "Expiration...", vbOkay, "Alert"
End
Else
MyRecs.MoveNext
End If
Next
I hope that is some help

[Rob Parker]

mi********@hotmail.com (MissiMaths) wrote in message news:<75**************************@posting.google. com>...

You could do it in vb? I am not sure how to get it to execute
automatically upon opening, unless you attach it to the end to a form
button or something but using DAO, you could search the field in the
table

<snip>

To get such a routine to execute on opening the database, simply put
the code in the Open event of the startup form of your database (set
this in Tools - Startup...). The message box(es) will display before
the startup form displays.

Rob