Date Format

[tommyf]

I have the following cade that takes the date from a calander control and then extracts the required field from a database.

 

Dim fdate As Date

Dim fday As Integer

 

fday = fday - Weekday(Me.DateTimePicker1.Value.Date, 0) + 1

fdate = DateAdd("d", +fday, Me.DateTimePicker1.Value.Date)

 

Dim mycommand As New OleDbCommand("SELECT * from tblgym WHERE Gdate = #" & Format(fdate, "G") & "#", MyConnection)

Dim MyReader As OleDbDataReader = mycommand.ExecuteReader()

MyReader.Read()

 

I have tried to format the date but can not seem to change it

 

Format(fdate, "DD/MM/YYYY")

and

Format(fdate, "ddmmyyy")

 

but I just get the follwoing error

 

Additional information: Cast from string "DD/04/YYYY" to type 'Date' is not valid.

 

I have also tried to format it in the SQL statement

 

as Format(fdate,"yyyymmdd") as I have done that before in Access but the program breaks on the following line

 

 

Dim MyReader As OleDbDataReader = mycommand.ExecuteReader()

 

Any Ideas as this is driving me nuts

[mutant]

Try this format:

"dd/MM/yyyy"

[tommyf]

Thanks mutant that works

 

Why does it have to be MM?

[mutant]

Because "mm" represents minutes.