Problema con select

[maverix]

Salve a tutti ho un problema con una select...il proble consiste che mi da un errore...che è erro 3061 previsto 1

il codice lo genero all'interno di un db acces del 97........ora vi posto il codice grazie a tutti...........


Dim destinazione
Dim data
Dim ARTICOLO
Dim QTASPED
Dim numddt
Dim cliente
Dim rigabolla

data = Me.dataddt
destinazione = Me.destinazione
ARTICOLO = Me.ARTICOLO
QTASPED = Me.QTASPED
numddt = Me.numddt
cliente = Me.cliente
rigabolla = Me.riga_ddt


Dim dbs As Database, rst As Recordset, rst1 As Recordset


Set dbs = OpenDatabase("C:/db/Gestione.mdb")


Set rst = dbs.OpenRecordset("SELECT * from ORDCLI WHERE cliente =cliente and ARTICOLO = articolo and QUANTITA > QTASPEDITA order by DATASCADENZA ASC ;")

grazie a tutti

[raffaeu]

scusa ma questa è una select multipla non mi sembra tu possa arla con quel tipo di sintassi

:-(


SELECT NOME_CAMPO1, NOME_CAMPO2 FROM NOME_TABELLA WHERE x = X ORDER BY NOME_CAMPO

nel where puoi mettere solo un paragone.

[maverix]

quindi dovrei fare cosi..

Set rst = dbs.OpenRecordset("SELECT * from ORDCLI WHERE cliente =cliente
.ma cmq mi da lo stesso errore ma visto che cliente e un campo di testo lo dovrei mettere tra apici oppure cosi va bene.............
grazie

[raffaeu]

query = "SELECT * FROM TABELLA WHERE NOME_CAMPO=" & Variabile

rs.Open query


Almeno cosi' trovi subito l' errore nella query che dici?


Passagli una variabile non la text è meglio!!

:tongue: