I have a problem with dates in a form filter using "between" 1

[adita1983]

Hello,

Can u help me please with the following problem?
A want to use "between" in a filter with 2 dates.Here is the code:

Private Sub Submit_Click()

Dim str As String
str = "Total_sampling.Statusenddate between #"&Me.Data1&"# AND #"&Me.Data2&"#"

DoCmd.OpenForm "Total_sampling", acFormDS, , str

End Sub


I recive the error Expected: end of statement

Tks a lot,
Adrian

 

[TheAceMan1]

adita1983 . . . . .

Try:

[blue]str = "[Statusenddate] between #" & Me.Data1 & "# AND #" & Me.Data2 & "#"[/blue]

See Ya! . . . . . .

 

[KenReay]

Hi

"Having a problem" does not tell us much about what is actually happening, do you get a syntax error, do you get "wrong" data returned, Error message(s)?

Dates must be presented in a limited number of formats try

Private Sub Submit_Click()

Dim str As String
str = "Total_sampling.Statusenddate between #"& Format(Me.Data1,"yyyy/mm/dd") & "# AND #" & Format(Me.Data2,"yyyy/mm/dd") & "#"

DoCmd.OpenForm "Total_sampling", acFormDS, , str

End Sub




Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -

http://www.kenneth.reay.btinternet.co.uk

UK

 

[adita1983]

Hello,

It works with Format.Tks a lot Ken Reay.