Date SQL Statement (working with MS Access)

See more:

VB

&<<code><code><code>

The following code does not return any values, can anyone help me? I have been struggling for an hour with this. Thanks in Advance.

Dim conn As New OleDb.OleDbConnection
        Dim cmd As New OleDb.OleDbCommand
        Dim da As New OleDb.OleDbDataAdapter
        Dim dsLocal As New DataSet
        Dim salesFrom As Date = dtpFrom.Text
        Dim salesTo As Date = dtpTo.Text
        Dim FromDate As String = Format(salesFrom, "dd/MM/yyyy")
        Dim ToDate As String = Format(salesTo, "dd/MM/yyyy")

        Try


        conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:\mrs-v4\mrs-v4-" & LogOn.mDatabaseName & ".mdb"
        cmd.Connection = conn
        cmd.CommandType = CommandType.Text

   <pre lang="vb">cmd.CommandText = "Select [docket#],consignmentID, date_sold, qty, amount, vat,[accsale#] From sale where consignmentID >=" & txtConsID_Sales.Text & " AND date_sold >= " & FromDate & " AND  date_sold <= " & ToDate

da.SelectCommand = cmd
dsLocal.Tables.Add("sample")
dsLocal.Tables("sample").Clear()
conn.Open()
da.SelectCommand.ExecuteNonQuery()
da.Fill(dsLocal.Tables("sample"))
conn.Close()

Me.dgvSales.DataSource = dsLocal.Tables("sample")

conn.Dispose()

ds = dsLocal

da.Dispose()
dsLocal.Dispose()
cmd.Dispose()
Catch ex As Exception

End Try
End Sub