Uso del try, cacth, finally, end try

[SunDarK]

try ' Colocas el TRY en una parte de tu código que sea sensible a errores,es decir,que puedan cometerse errores
'como por ejemplo al introducir datos,al conectar a una bd,etc
cn.open() ' Abre la conexion indicada en su propiedad ConnectionString
cmd.executenomquery 'Ejecuta la sentencia contenida en la propiedad CommandText contra la conexión definida
'en la propiedad ConnectionString.No puede devolver un conjunto de registros,como por ejemplo UPDATE,DELETE o '
'INSERT ya que devuelve un entero indicando el numero de filas que se han visto afectada por la ejecución del
'objeto Command
'es EXECUTENONQUERY ehhh

msgbox("grabado") ' Muestra un mensaje indicando GRABADO
cargar_data ' Ejecuta un procedimiento que se llame Cargar_Data
catch qex as sqlexception ' Caza la excepción,si es que se produce,que se produce entre el TRY y el CATCH

msgbox (qex.message) 'Muestra un mensaje indicando el error que se ha producido

finally
'Aqui pones que quieres que pase si se produce el error,por ejemplo si es al introducir datos puedes poner
'que se pongan los casilleros en blancos y vuelva a pedir que introduzca registros
cn.close() ' Cierra la conexión
cmd.disposse ' libera recursos del sistema
'es DISPOSE

end try ' Fin de la zona sensible a errores

Saludoss