Next Month

[Guest]

I am trying to set up a data base where it tells me who has a birthday next
month. I enter the following expression that works until the next month then
I have to go in and change the - number to show the following month or it
will show 2 months ahead and skip the following month (i.e. This is May, but
it is showing July instead of June.) This defeats the purpose of the query.
Any thoughts

Month(Date()+DateSerial(Year(Date()),Month(Date())-1,0))

 

[Guest]

Try

Where Month([FiedName]) = Month(DateAdd("m",1,Date()))

 

[Guest]

You can use the before Update event of the text box to check if there are
duplicates, if there are give a message and stop the process

Something like
If DCount("*","TableName","Right([FieldName],4) =""" &
Right(Me.[TextBoxName,4) & """") > 0 Then
Msgbox "Record already exist"
Cancel = True 'stop the propcess
End If


Note: need to change the FieldName , TableNAme , TextBoxName to yours

 

[Guest]

Thanks, looks like it is working

Try

Where Month([FieldName]) = Month(DateAdd("m",1,Date()))

--
Good Luck
BS"D

I am trying to set up a data base where it tells me who has a birthday next
month. I enter the following expression that works until the next month then
I have to go in and change the - number to show the following month or it
will show 2 months ahead and skip the following month (i.e. This is May, but
it is showing July instead of June.) This defeats the purpose of the query.
Any thoughts

Month(Date()+DateSerial(Year(Date()),Month(Date())-1,0))