SQL e Date

[anatroccolo]

Ho questo codice:

SQL = "Select * From Timbrature Where Matricola = '" & txtMatr.Text & "' And Data = #" & DateValue(txtData.Text) & "#"

Con questa stringa SQL non mi estrae niente. Il campo Data è contenuto in una tabella Access formattata come campo Data e nella TextBox inserisco per es. 01/01/2002

Se qualcuno mi può aiutare.

Grazie 1000

[gyonny]

avevo il tuo stesso problema.

appena risolto grazie a teolo

cer1Sc = Format(TexFdata1.Text, "dd/mm/yyyy")
cer2Sc = Format(TexFdata2.Text, "dd/mm/yyyy")

RecRS.Open "select * from scadenze where data >= #" & cer1Sc & "# and data <= #" & cer2Sc & "# order by data"

prova e fammi sapere

by
gyonny

[anatroccolo]

Ho provato anche il tuo codice ma niente da fare. Ho fatto dei controlli e la stringa SQL che passo per l'apertura del DB è strutturata come seguente:

Select * From Timbrature Where Matr = '0000847' And Data = #01/08/2002#

e mi sembra formalmente corretta. Sta di fatto che anche se il campo Data della tabella Timbrature(Access) è settato come tipo dati = Data/Ora non estrae nulla.

Possibile che con il formato data non funzioni.

[darkblOOd]

se usi datevalue devi togliere i #

almeno mi sembra

[sebamix]

Prova formattando con mese/giorno/anno .

"mm/dd/yyyy"

[ladyBlu]

Originariamente inviato da anatroccolo
Ho questo codice:

SQL = "Select * From Timbrature Where Matricola = '" & txtMatr.Text 
& "' And Data = #" & DateValue(txtData.Text) & "#"

Con questa stringa SQL non mi estrae niente. Il campo Data è contenuto in una tabella Access formattata come campo Data e nella TextBox inserisco per es. 01/01/2002

tu inserisci nella text una data in formato "dd/mm/yyyy", ma su access che formato Data hai assegnato al campo? devi dargli "Data in cifre".
se il campo sulla tabella lo hai chiamato Data, ti consiglio di cambiargli nome... qualcosa tipo DataTimbratura... non vorrei che ti si creino problemi perchè Data potrebbe essere una parola chiave di Access...

e poi prova così:

dim miaData as string
miaData = Format(txtData.Text, "DD/MM/YYYY")
SQL = "Select * From Timbrature Where Matricola = '" & txtMatr.Text 
& "' And DataTimbratura = #" & cdate(miaData) & "#"

:master:...dovrebbe andare...

[anatroccolo]

Grazie per le idee questa sera provo e vi faccio sapere!!!!!!!!!!

Ciao

[anatroccolo]

Grazie ragazzi ho risolto anche se mi è rimasto un dubbio che ora vi spiego:

dim miaData as string
miaData = Format(txtData.Text, "DD/MM/YYYY")
SQL = "Select * From Timbrature Where Matricola = '" & txtMatr.Text 
& "' And DataTimbratura = #" & cdate(miaData) & "#"

ho utilizzato il codice che mi ha passato LadyBlu e all'inizio non funzionava ma provando ha fare una Query direttamente in Access i dati venivano estratti. Allora ho visualizzato la struttura SQL della Query e ho scoperto che, anche se la mia tabella Access nel campo Data visualizzava un valore come 01/08/2002 (dd/mm/yyy) lo interpreta come 08/01/2002 (mm/dd/yyy).
Ho cambiato la stringa format e tutto risolto.

Sapete dirmi se è normale questo settaggio data????

Ciao

[sebamix]

Dalla mia esperienza sì, è normale (in tutti i miei DB succede).
Per questo ti ho detto di provare a usare
"mm/dd/yyyy"
Nel format() proposto in precedenza.

[anatroccolo]

Scusami Sebamix non avevo proprio notato l'inversione mm/dd nel tuo post.

Cmq ora so una cosa nuova!!!

Ciao