https://foro.gambas-es.org/viewtopic.php?f=3&t=7581&p=45623#p45623
-----------------------------------
alessandri
Jueves, 15 Agosto 2019, 14:15

Re: Evitar Cuelgue Por Desconexion
-----------------------------------
Hola amigos.
Me pase todo un día probando alternativas y no doy con nada.
Lo ultimo que hice fue intentar detectar el error con el siguiente código.

Public Sub Timer1_Timer()
    i += 1
    If i = 3 Then
        Try Module1.conn.Exec(txtinsert.Text) 'Inserta registros cada 3 segundos
        inserciones += 1
        i = 0
    Endif
    
    Catch
      Module1.Ierror = " Formulario y SUB: " & Error.where & " Error: " & error.text
      Wait
      CapturaError.Show
End

Se suponía que con ese CATCH debería retornar un mensaje de error, al cortarse la conexión,
pero como siempre se cuelga y no dice nada. No veo la forma de resolver eso. :( , 
no me gusta sacar la bandera blanca pero aquí parece que hay que hacerlo.
Insisto, creo que deberíamos tratar de informarle a benoit.
Voy a cancelar el servidor de prueba ya que no veo progreso. Les dejo las ultimas modificatorios
que le hice al probador.

Gracias por sus aportes.


