Errore di run-time '3021': Nessun record corrente

[masterix21]

ApriRecordSet ("SELECT * FROM tbl_prodvend WHERE Rs_IdFattura = " & CDbl(intidfattsel))
Do While Not RS.EOF
intidprodotto = RS!Rs_IdProdotto
Set ZX = DB.OpenRecordset("SELECT * FROM tbl_prodotti WHERE Id_prodotto = " & intidprodotto)
If ZX!Rs_Codice <> "" Then
list_codice.AddItem ZX!Rs_Codice
End If
If ZX!Rs_Nome <> "" Then
list_descrizione.AddItem ZX!Rs_Nome
End If
If RS!Rs_Quantita <> "" Then
list_qnt.AddItem RS!Rs_Quantita
End If
If RS!Rs_PrezzoKg <> "" Then
list_prezzo.AddItem RS!Rs_PrezzoKg
End If
If RS!Rs_PrezzoKg <> "" And RS!Rs_Quantita <> "" Then
list_importo.AddItem CDbl(RS!Rs_PrezzoKg) * CDbl(RS!Rs_Quantita)
End If
RS.MoveNext
Loop

l'errore lo segnala sulla riga:

If ZX!Rs_Codice <> "" Then

Chi mi sa aiutare?

[masterix21]

ho risolto. Scusate il disturbo ;D*