Ciao a tutti! Maneggio da poco VB6 e perciò vi chiedo aiuto anche se forse è più un problema di linguaggio SQL il mio:
Ecco il codice:
Dim DBArchvio As Database
Dim RS As Recordset
Dim strSQL As String
Dim dtCurrentDate As Date
Dim prova As ListItem
Dim Cliente As String
dtCurrentDate = Date
Set DBArchivio = OpenDatabase(App.Path & "\store.mdb")
strSQL = "SELECT * FROM Clienti WHERE Data = '" & dtCurrentDate & '"
Set RS = DBArchivio.OpenRecordset(strSQL)
Ecco la finestra di errore di VB6
Tipi di dati non corrispondenti nell'espressione criterio
Mi viene evidenziata la riga Set RS = DBARchivio.OpenRecordset(strSQL)
Il problema è nella "pesca" nel campo Data della tabella Clienti del database. Questo benedetto campo Data l'ho settato nel database di tipo Data/Ora ( parliamo di Access ) col formato 19/02/2004.
Sembrerebbe corrispondere tutto invece quando viene eseguita la SELECT mi torna indietro l'errore suddetto di non rispondenza del criterio dei dati! Dove sbaglio? E' un problema di apici e doppi apici sbagliati nella SELECT ?
Sarebbe un pò urgente per cui mi rimetto alla vostra disponibilità! Grazie!