30/07/09 7:10
symonx80
Ciao,
ho un problema con la gestione degli errori in vb6.
Ho il seguente codice
Scorrendo la mia collection devo salvare in un recordset ciascun elemento, ma vorrei che se un elemento generasse errore fosse possibile riprendere la mia routine dall'elemento successivo, tramite la gestione di ERRORE_SALVATAGGIO_ELEM che dovrebbe riprendere l'esecuzione della routine dalla riga di codice che sposta il ciclo For all'elemento successivo, e non interrompere bruscamente l'esecuzione di essa.
Ho provato anche inserendo nel Resume il numero di riga ma non ha avuto successo ugualmente, viene sempre generato un errore come se si perdesse il rifermento alla collection che si sta scorrendo.
Dove sto sbagliando?
ho un problema con la gestione degli errori in vb6.
Ho il seguente codice
Public Sub .... ....... .......... For Each elemento In collection 'On Error GoTo ERRORE_SALVATAGGIO_ELEM With recordSetElementi .AddNew .Fields("CAMPO1") = elemento.campo1 .Fields("CAMPO2") = elemento.campo2 ...... ........ End With NUOVO_ELEM: Next 'Elemento successivo della collection End If End If recordSetElementi.update recordSetElementi.Close Exit Sub ERRORE_SALVATAGGIO_ELEM: MsgBox "Errore salvataggio di un elemento" Resume NUOVO_ELEM End Sub
Scorrendo la mia collection devo salvare in un recordset ciascun elemento, ma vorrei che se un elemento generasse errore fosse possibile riprendere la mia routine dall'elemento successivo, tramite la gestione di ERRORE_SALVATAGGIO_ELEM che dovrebbe riprendere l'esecuzione della routine dalla riga di codice che sposta il ciclo For all'elemento successivo, e non interrompere bruscamente l'esecuzione di essa.
Ho provato anche inserendo nel Resume il numero di riga ma non ha avuto successo ugualmente, viene sempre generato un errore come se si perdesse il rifermento alla collection che si sta scorrendo.
Dove sto sbagliando?
Ultima modifica effettuata da symonx80 30/07/09 7:10
aaa