Data e access (qry)

[M@sE]

Ciao a tutti, dopo aver esaminato a fondo gli altri topic e aver provato diverse formule, vi chiedo aiuto.

Questa è la variabile:

Dim qrydata, data, giorno
data = FormatDateTime(Now())
qrydata = Year(data) & "/" & Month(data) & "-" & Day(data)
data = Day(data) & "-" & Month(data) & "-" & Year(data)
giorno = (WeekdayName(Weekday(data)))


Questa è la query:

contaterapia = "select COUNT (*) AS totaleRecord FROM missioni WHERE data="&qrydata&" and giorno='"&giorno&"'"


SU ACCESS
A) FUNZIONA SE IL CAMPO DATA E' IN TESTO
B) NON FUNZIONA SE IL CAMPO DATA E' IN DATA E ORA
C) CON IL GIORNO NON HO AVUTO PROBLEMI

Cosa posso fare?

[Alethesnake]

io con access in genere uso le date in campi testo

[M@sE]

Come dici tu mi funziona (DANDO LA FORMA TESTO SU ACCESS) ma non riesco poi ad ordinarli!

Avresti una soluzione?

per ordinare?

[Alethesnake]

se il formato è aaaa/mm/gg non dovresti avere alcun problelma di ordinamento

[M@sE]

invece ho problemi!... come posso risolvere?

[M@sE]

Dimenticavo,
premetto che i dati sono stati inseriti in questo formato sul DB:

data = Day(data) & "-" & Month(data) & "-" & Year(data)

Può dipendere da questo?

[viki1967]

Di default qualsiasi database access memorizza la data all'inglese, per questo succedono casini immani quando cerchi di recuperare da codice asp utilizzando le funzioni della data, soprattutto se (come fai tu) la data è inserita all'italiana.

Perchè finchè metti il 14/08/2005 è chiaro che può essere solo che il 14 agosto...ma quando andrai ad inserire il 03/04/2005 sarà il 4 marzo o il 3 aprile?

Pertanto intanto ti consiglio di inserire le date nel formato in cui il db se le aspetta (quindi all'inglese).

Cambia il formato della data ed impostalo nel formato tipo AAAA/MM/GG.

E' un modo decisamente puù sicuro, certo darà qualche noia in più in inserimento, ma vedrai che sarai soddisfatto una volta che devi gestire i dati.

Questa è un esempio di funzione che trasforma al momento dell'inserimento nel db, la data nel formato AAAA/MM/GG:

Function dataShort(dtData) 
dataShort = year(dtData&"/"&right("00"&month(dtData),2)&"/"&right("00"&day(dtData),2)) 
end Function

. Inoltre la funzione richiede un valore data... devi prima fare la trasformazione,

data2 = dataShort(CDate(data2))

[M@sE]

il problema è che le date sono già inserite nel db..

[viki1967]

Originariamente inviato da M@sE
il problema è che le date sono già inserite nel db..

E allora?
Cambia il formato data in AAAA/MM/GG

[M@sE]

l'ho già fatto così:

qrydata = Year(data) & "/" & Month(data) & "/" & Day(data)


ma niente..