Funzione per date DB Access

[[trodat]]

Ciao a tutti.

Con la ricerca ho trovato questa funzione per la trasformazione del formato data (purtroppo lavoro con un db access e sempre con la ricerca ho capito che il formato più performante è aaaa/mm/gg):

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

In questo modo recupero i dati dal db:

data1 = request.form("data1")
data2 = request.form("data2")

data1 = dataShort(data1)
data2 = dataShort(data2)

ma lo script restitusce errore nella riga della funzione, dove sbaglio?

Error Type:
Microsoft VBScript runtime (0x800A000D)
Tipo non corrispondente.: '[string: "05/08/2005/08/05"]'

Grazie.

[br1]

Hai chiamato la funzione dataShort ma in restituzione valorizzi dataDB

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... e tu le passi una stringa... devi prima fare la trasformazione ( e magari anche qualche controllo sulla validita' )

data2 = dataShort(CDate(data2))

ciao

[[trodat]]

:rollo: Errore di gioventù... grazie!