Originariamente inviato da XVincentX
Chiedo scusa per la poca chiarezza, spero di averlo sistemato a dovere

Non posso fare il movefirst o last, poichè io procedo cosi
L'utente inserisce il codice in codice.text
quindi
codice:
' cs e rs sono adodb.connection e recordset già collegati
query = "Select quantita from prod where codice = '" & codice.text & "'"
set rs = cs.execute(query)
if rs.recordcount>0 then 
     qta = rs.fields("quantita").value
end if 
Sull'ultima riga mi da l'errore
Se leggi il post sopra, l'errore è provocato quando non riempio tutti i textbox
ciao, fai le modifiche in rosso... per testare se il recordset è stato riempito, puoi usare anche questa sintassi:
codice:
if rs.eof and rs.bof then
...recordset vuoto
else
...recordset pieno
end if