Query annidate e variabile oggetto non impostata

[samoa]

...
Do Until rst.EOF
idpp = rst("idp")
sql_2 = "SELECT * FROM Pagamenti WHERE idp = " & idpp & ";"
rst2.Open sql_2, conn

Do Until rst.EOF
If rst("breakfast") = "Vero" Then
Numero = Numero + 1
End If
rst.MoveNext
Loop

rst2.Close
Set rst2 = Nothing

rst.MoveNext
Loop


Come fare a interrogare un DB usando i dati di un recordset per individuare
record di un'altra tabella ?

l'errore che ottengo è variabile oggetto o variabile del blocco with non impostata.

cosa sto sbagliando?

[alka]

Se imposti rst2 a Nothing, perdi il riferimento alla connessione contenuto in quella variabile e, pertanto, quando il ciclo si ripete, non puoi chiamare il metodo Open poiché la variabile contiene, appunto, Nothing.

Ciao!