Use can use the following sql code to pull hte folder names from the table
whose expiration date is <30.
SELECT [Table 1].ExpDate, [Table 1].FolderName,
DateDiff("d",Now(),[expdate]) AS Expr1
FROM [Table 1]
WHERE (((DateDiff("d",Now(),[expdate]))<30));
Try using it in your form on open event.
HTH
--
------------------------------------
Make Unlimited phone calls from your PC to ANY phone in the World!
http://www.eboom.com/free/
Quote:
> Hello, it's been a while since I've worked with VBA for
> Access and I'm quite ( VERY ) lost with a small problem
> I'm trying to fix.
> We have alot of 'field folders' for color standards that
> we used to keep track of within an Excel spreadsheet.
> It's a pretty big workbook with alot of rows and as we
> all know Excel shouldn't be used as a database when
> Access can just as easily replace it.
> I took it upon myself to create a simple access database
> that primarily uses two tables.
> Table 1 [fieldfolders] is used to categorize all the
> specific colors we have.
> Table 2 [childfolders] is used for each physical folder
> that we have.
> ie:
> Color 1 [table 1]
> - folder 1 [table 2]
> - folder 2 [table 2]
> - folder 3 [table 2]
> Color 2 [table 1]
> - folder 1 [table 2]
> - folder 2 [table 2]
> etc...
> I created a form with a child form inside of it in
> datasheet view. So you can view all the folders for each
> color.
> Each folder has an expiration date on it ( which is
> merely a date field ). What I would like is to have a msg
> box pop up a month prior to each expiration date
> reminding the user to reorder the folder.
> I left my VBA book in my other jacket. lol
> Any help would be greatly appreciated!