Como saber si existe conexion con otro equipo???
Posted: Mon Nov 20, 2006 10:53 am
Hola a todos.
Estoy desarrollando un modulo para la trasferencia de ficheros via wifi. Lo unico que me queda es controlar si se corta la conexion para no permitirle que pueda actualizar los datos y que trabaje de forma local hasta que la conexion sea buena. Estoy utilizando un timer para lanzar cada x tiempo una comprobacion de acceso a otro equipo(donde se encuentra la informacion). El problema es que no se como controlar eso cuando no existe la conexion. Me explico, cada x tiempo quiero lanzar una funcion que me diga si se puede o no acceder a una maquina en concreto...
Yo estoy utilizando este codigo...
FUNCTION estado_conexion(oTmr)
oTmr:DeActivate() &&se desactiva el temporizador para poder hacer las acciones pertinentes
use("\\maquina\ruta\articulos.dbf")
IF used("\\maquina\ruta\articulos.dbf")
msginfo('Hay Conexion')
else
msginfo('No hay Conexion')
endif
oTmr:Activate()&&se vuelve activar el temporizador
RETURN nil
Pero no es esto lo que pretendo ya que si no hay conexion el use me da un error y eso es lo que quiero controlar para que no se me cuelgue la aplicacion..
Alguien me puede dar una idea...
Saludos...
Elías Torres.
Estoy desarrollando un modulo para la trasferencia de ficheros via wifi. Lo unico que me queda es controlar si se corta la conexion para no permitirle que pueda actualizar los datos y que trabaje de forma local hasta que la conexion sea buena. Estoy utilizando un timer para lanzar cada x tiempo una comprobacion de acceso a otro equipo(donde se encuentra la informacion). El problema es que no se como controlar eso cuando no existe la conexion. Me explico, cada x tiempo quiero lanzar una funcion que me diga si se puede o no acceder a una maquina en concreto...
Yo estoy utilizando este codigo...
FUNCTION estado_conexion(oTmr)
oTmr:DeActivate() &&se desactiva el temporizador para poder hacer las acciones pertinentes
use("\\maquina\ruta\articulos.dbf")
IF used("\\maquina\ruta\articulos.dbf")
msginfo('Hay Conexion')
else
msginfo('No hay Conexion')
endif
oTmr:Activate()&&se vuelve activar el temporizador
RETURN nil
Pero no es esto lo que pretendo ya que si no hay conexion el use me da un error y eso es lo que quiero controlar para que no se me cuelgue la aplicacion..
Alguien me puede dar una idea...
Saludos...
Elías Torres.