Ver Mensaje Individual
  #3 (permalink)  
Antiguo 30/10/2005, 06:57
antonio2005pe
 
Fecha de Ingreso: agosto-2005
Ubicación: Peru-Lima
Mensajes: 225
Antigüedad: 18 años, 8 meses
Puntos: 0
Cita:
Iniciado por jc_moty
Puedes hacerlo asi:
Código:
Sub Proceso()
On Error Resume Next
' Sentencias
End Sub
Aunque esto del "On Error resume Next" no lo recomiendo mucho; porque lo que hace es ignorar todos los errores que se puedan dar en tu codigo; y a veces se hace necesario "rastrear" ciertos errores; para poder asi, dar soluciones alternas al error que ocurrio.
Ahora bien, el problema esta en que si no sabes que errores te puede dar el proceso, entonces como dar soluciones alternas a los errores....porque no necesariamente al usuario le va a dar los mismos errores que te da a vos. Es en estos casos cuando justifico el uso de "On Error Resume Next".
Sin embargo te dejo un pequeño ejemplo de como "rastrear" los errores; sin que la aplicacion se te trunque:
Código:
Sub Proceso()
On Error GoTo errores
' Sentencias
errores:
If Err.Number <> 0 Then
    MsgBox "Error # " & Err.Number & Chr(13) & Err.Description
End If
End Sub
Saludos.
hola, pero el on error resume next o got solo ignora o lo lleva a otro codigo pero no cancela las operaciones que ya fueron hechas...
por ejemplo:

ado1.recorset.addnew '<<<<restaurar
ado1.recorset!nombre = nombre '<<<<restaurar
ado1.recorset.update '<<<<restaurar

ado2.recorset.addnew '<<<<restaurar
ado2.recorset!nombre = nombre '<<<<digamos que sale un error aki, que restaure todo lo anterior como si no hubiera hecho la operacion
ado2.recorset.update