Hi.., I use this VBA Code :

dim dt as date
dt = Range("B2").Value

.CommandText = Array("SELECT trx.datetrx, trx.notrx, trx.itemcode FROM trx " & _
"WHERE trx.datetrx ='" &dt & "'")

and then error message like this :
Run-time error '1004'
General ODBC Error