maledetta select

[asdfgasdfg]

sto costruendo una maschera access ho questo codice

Private Sub totale_carico_LostFocus()
cnn = CurrentProject.Connection
Dim cnnConnect      As ADODB.Connection
Dim rstFieldData    As ADODB.Recordset
Dim strConnect      As String
Dim strSQL          As String

strConnect = CurrentProject.Connection
Set cnnConnect = CurrentProject.Connection
'cnnConnect.Open strConnect

strSQL = "SELECT * FROM gestione_merce WHERE id = " & id & "  order by data "
Set rstFieldData = New ADODB.Recordset
With rstFieldData
   .CursorType = adOpenKeyset
   .LockType = adLockOptimistic
   .Open Source:=strSQL, _
      ActiveConnection:=cnnConnect, _
        Options:=adCmdText

mi da errore operatore mancante e mi evidenzia le righe :
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open Source:=strSQL, _
ActiveConnection:=cnnConnect,
perchèèèèè

P.S:i campi della select esistono tutti

[asdfgasdfg]

nessun'idea

[optime]

"id" da dove lo prendi? assicurati che valga qualcosa...

[asdfgasdfg]

ti spiego la select avviene tra gli stesssi campi di una tabella id è avvalorato, anche perchè se tolgo l'order by data mi funziona bene, ma non mi prende l'ultimo in ordine di data

[asdfgasdfg]

mi dice
errore di sintassi(operatore mancante) nell'espressione della query '6=6order by data desc
quindi l'id è avvalorato

[optime]

sembra - dall'errore postato - che tu debba aggiungere uno spazio prima della locuzione "order by"