[VB, SQL] Ricerca per data su Access (Query)

[w_t]

Devo fare una ricerca per data su un campo "Date" di Access:

la data da ricercare la passo con due "DateTimePicker" e poi formattandole con il seguente codice:

1° Metodo:

            Dim DatDa As Date = dtpDa.Value
            Dim DataDa As Date = DatDa.ToShortDateString
            Dim DatA As Date = dtpA.Value
            Dim DataA As Date = DatA.ToShortDateString


            Dim sql2 As String = "SELECT Quantita FROM Movimenti WHERE Data >= #" & DataDa & "# AND Data <= #" & DataA & "#

2° Metodo:

            Dim DatDa As Date = dtpDa.Value
            Dim DataDa As Date = DatDa.ToShortDateString
            Dim DatA As Date = dtpA.Value
            Dim DataA As Date = DatA.ToShortDateString


            Dim sql2 As String = "SELECT Quantita FROM Movimenti WHERE Data  Between #" & DataDa & "# AND  #" & DataA & "#

Con nessuno dei due metodi funziona,

con il primo mi da errore di Query,

con il secondo il risultato e' "0".


Come devo fare per fare una ricerca per data???

[amodio]

anche a me dava errrore

caso strano -->ma vero

con la funzine mid ho dovuto invertire il giorno con il mese

prova a me dopo ha funzionato
forse perche access prende la data in inglese!!

[w_t]

non la conosco......

[JamesD]

Dovresti provare a fare così, deve funzionare

Dim sSql2 As String

sSql2 = "SELECT Quantita FROM Movimenti WHERE Data Between #" & dtpDa.Value & "# AND  #" & dtpA.Value & "#"

ToShortDateString :master: Perchè usi questo? Io ti consiglio di non usarlo! Secondo sta proprio li l'errore!

[w_t]

OK questa sera provo, grazie per ora ciao!!!!!

[darkblOOd]

Originariamente inviato da JamesD

ToShortDateString :master: Perchè usi questo? Io ti consiglio di non usarlo! Secondo sta proprio li l'errore!

sono metodi di VB.NET

ma w_t ci ha abituato a non specificare di quale versione di vb si tratta :quipy:

[JamesD]

aaah ho capito!!
Per ora per me .net = Unknow :gren:

[w_t]

Io conosco solamente VB.NET,

VB6 non so se e' roba da mangiare o cosa......:gren: