Home •  Forum •  FAQ •  Search •  Recent Topics •  Memberlist •  Register •  Log in 
Forum » Gambas » General

Detectar Estado De Conexión Por Medio De 2 Timers

Reply to topic

 

v3ctor
Quote
Posts: 1786 Location: Uruguay
Monday, 22 June 2015, 15:32
Subject: Detectar Estado De Conexión Por Medio De 2 Timers
que les parece este código?

Public Sub HayConexion()

If Not Desktop.NetworkAvailable Then
LabEstado.Text = "Conexión no disponible"
txtFiltro.Enabled = False
btnBuscar.Enabled = False
Timer1.Start
Timer2.Stop
Return
Else
LabEstado.Text = ""
txtFiltro.Enabled = True
btnBuscar.Enabled = True
Timer1.Stop
Timer2.Start
Endif

End

Public Sub Form_Activate()
HayConexion()
End

Public Sub Timer1_Timer()
HayConexion()
End

Public Sub Timer2_Timer()
If Not Desktop.NetworkAvailable Then Timer1.Start
End

Profile PM   Website
shordi
Quote
Posts: 4982 Location: Albacete
Tuesday, 23 June 2015, 08:40
Subject: Re: Detectar Estado De Conexión Por Medio De 2 Timers
Correcto. No es lo que yo haría, sobre todo en bases MySQL donde la comprobación de si está abierta o no conlleva algún delay, pero la idea es correcta.

Profile PM  
PabloGener
Quote
Posts: 18 Location: Ciudadela, Buenos Aires
Thursday, 25 June 2015, 00:14
Subject: Re: Detectar Estado De Conexión Por Medio De 2 Timers
yo apagaría el Timer1 antes de lanzar HayConexion() otra vez.
además, no es una buena práctica dejar los nombres de controles "por default", yo te recomiendo que a cada Timer le pongas un nombre que represente "para qué se prende". por ejemplo tmrBuscaConexion, tmrCierraFormulario, etc.
con la modificación que yo te sugiero te quedaría así:

Public Sub Timer1_Timer()
Timer1.Stop
HayConexion()
End


digo porque en "HayConexion()" volves a dar .Start a un control que ya está '.starteado'. no se si se entiende el concepto.
saludos!!

Profile PM   Skype
shordi
Quote
Posts: 4982 Location: Albacete
Thursday, 25 June 2015, 09:20
Subject: Re: Detectar Estado De Conexión Por Medio De 2 Timers
no es una buena práctica dejar los nombres de controles "por default"


Totalmente de acuerdo, sin embargo es un estándar "no oficial" el dejar los nombres por defecto para ejemplos y consultas, de esa manera es muy sencillo probar el ejemplo:
Creas un proyecto nuevo, añades los controles que vengan al caso dejándo los nombres por defecto y pegas el código del foro. Debería funcionar sin problemas. Renombrando los controles la prueba se vuelve mucho más tediosa y prolija.

Saludos.

Profile PM  
PabloGener
Quote
Posts: 18 Location: Ciudadela, Buenos Aires
Thursday, 25 June 2015, 17:41
Subject: Re: Detectar Estado De Conexión Por Medio De 2 Timers
shordi escribió: [Ver mensaje]
no es una buena práctica dejar los nombres de controles "por default"


Totalmente de acuerdo, sin embargo es un estándar "no oficial" el dejar los nombres por defecto para ejemplos y consultas, de esa manera es muy sencillo probar el ejemplo:
Creas un proyecto nuevo, añades los controles que vengan al caso dejándo los nombres por defecto y pegas el código del foro. Debería funcionar sin problemas. Renombrando los controles la prueba se vuelve mucho más tediosa y prolija.

Saludos.


¡Es cierto! no lo había pensado. lo voy a tener muy en cuenta a la hora de preguntar cosas en el foro, ejemplificando con código "de prueba", para que otros puedan facilmente copiar-y-pegar mi ejemplo y probarlo.

Profile PM   Skype
Reply to topic
 

Page 1 of 1


  
You cannot post new topics
You cannot reply to topics
You cannot edit your posts
You cannot delete your posts
You cannot vote in polls
You cannot attach files
You can download files
You cannot post calendar events

   

This is a "Lo-Fi" version of our main content. To view the full version with more information, formatting and images, please click here.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Generation Time: 0.3282s (PHP: -80% SQL: 180%)
SQL queries: 22 - Debug Off - GZIP Enabled