alessandri escribió:  

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.

shordi escribió:  

Esperate a mañana para cerrar el servidor. Estoy probando las inserciones y luego te cuento.

alessandri escribió:  

Caso 2: Cuando el cliente se encuentra conectado vía internet al servidor y desconecto el cable de Red
la aplicación se cuelga. Al conectar el cable de Red no vuelve a funcionar.