[Visual Basic 6] Errore di run-time '3021'

[jamby]

Sono anni che programmo in Visual Basic ma ora mi trovo a sbattermi su un errore di run-time '3021'!
La cosa assurda è che se provo il programmino su piattaforma Visual Basic FUNZIONA BENISSIMO, ma se creo il file .exe e provo mi da quel cacchio di ERRORE!
Cmq questo è il codice anche se sono convinto che sta bene:


'trovo id del record per poi modificare i campi della tab. connessioni

Set con = datab.OpenRecordset("SELECT connessioni.utente_id FROM connessioni, utenti WHERE utenti.cognome='" & fine_cognome.Text & "' AND utenti.nome='" & combonome.Text & "' AND utenti.id=connessioni.utente_id AND connessioni.durata='no'")
idriga = con.Fields("utente_id")
con.Close


'calcolo il totale di alcuni campi che ho creato
totale = (varminu * (minuti.Text)) + (varstam * (Text.Text))
totale = 0 + Format(totale, "#####.##")

'mod valori dei campi della tab. connessioni
Set con = datab.OpenRecordset("SELECT * FROM connessioni WHERE connessioni.utente_id=" & idriga & " AND connessioni.durata='no';")

con.Edit
con.Fields("inizio") = inizio.text
con.Fields("durata") = minuti.Text
con.Fields("Stampe") = Text.Text
con.Fields("tot") = totale
con.Update

con.Close
MsgBox ("TOTALE " & vbCrLf & "€ " & totale)
Unload Me



AIUTATEMI VI PREGO ....STO SOFFRENDO TROPPO!!!!

[XVincentX]

E' difficile dirlo, se dici che nel progetto va bene e nell'exe erra, non si può determinare la riga che da l'errore.
Non è che usano due database diversi?

3021 vuol dire che il recordset selezionato è vuoto...
Non ti dice niente?
Non è che nel codice hai qualche selezione di database che potrebbe essere vuota? Se si puoi fare
if rs.recordcount = 0 then exit sub e eviti l'errore..

[alka]

Non mi sembra il caso di aprire una nuova discussione per un semplice titolo: ho già corretto quella precedente.

Continua pure questa.

Chiudo... ciao!