VBA Date problem (1 Viewer)

[sam1fletcher]

hi all

the code i have works for every other month of the the year but not for feburary.

the code is simple :: if within 2 dates then edit the recordset.

If Sdate > #2/1/2014# And Sdate < #2/30/2014# Then
.Edit
!feb2 = !feb2 + Amount
.Update
End If
If Pdate > #2/1/2014# And Pdate < #2/30/2014# Then
.Edit
!feb4 = !feb4 + Amount
.Update
End If

for some reason the 2 if statement lines bring up a compile error, syntax

anyone know the resons

 

[pr2-eugin]

Sam, I do not think February has the day 30 in any of the Calender year..

If Sdate > #2/1/2014# And Sdate < [COLOR=Red][B]#2/30/2014#[/B][/COLOR] Then
    .Edit
    !feb2 = !feb2 + Amount
    .Update
End If
If Pdate > #2/1/2014# And Pdate < [COLOR=Red][B]#2/30/2014#[/B][/COLOR] Then
    .Edit
    !feb4 = !feb4 + Amount
    .Update
End If

 

[sam1fletcher]

What a nob i am thanks

sam

 

[pr2-eugin]

Ha ha, that's alright Sam.. Good Luck..

 

[Brianwarnock]

It seems odd that you are omitting the first of the month.

Brian