Validar conexion para CDOSYS

[Armando Picon]

Amigos

Por ahora estoy usando Cdossys para enviar mensajes a Hotmail, Gmail o Yahoo, sin ningun inconveniente ya que siempre tengo una conexión activa a internet. El caso es que me parece que debo establecer una rutina que me indique, previo al envio, si efectivamente la conexion a Internet esta activa... ¿como puede hacerse? ¿hay alguna función de xharbour o fivewin para hacerlo?

Gracias por adelantado

Armando

[Bayron]

IsInternet()

[Armando Picon]

¡Upsssss! Esta función no se encuentra en mi humilde versión disponible. De todas maneras se agradece el "tip"

IsInternet()

[Bayron]

Deberia estar disponible desde la version 6.12
http://forums.fivetechsupport.com/viewt ... isinternet

[Armando Picon]

Tienes razon Bayron.

Revisé la fuente de xHarbour y alli se encuentra. Mi error fue no haberlo encontrado , a primera vista, en el manual que se publica en la versión Comercial.

Gracias mil. Lo acabo de probar y efectivamente detecta si tengo conexión con Internet.

Saludos

Armando

[LuisPonce]

Hola

Por lo aqui leido, es posible detectar la conexion a internet mediante isInternet(), yo utilizo el CDOSYS para hacer envios por mail, mi problema es el siguiente :

El equipo de cuelga, y me da mensajes extraños ??

hb_vmrequestquery()is set-Couldn't create error SENDMESSAGE DISP_E_MEMBERNOTFOUND (al parecer no puede crear el mensaje de error...pero de que)

Alias does not exist (este si conocemos) al parecer pierde la ruta de los files, o genera algun tipo de conflicto con los .CDX

lo atribuyo al CDOSYS x que es la unica funcion y/o .ch que agregue a mis sistemas, que ahora estan totalmente inestables

aun sin usar el CDOSYS se cuelga, es que esta dentro de toda la app

quitare el .ch para hace nuevos intentos o existe alguna que si funcione

compilo con xharbour y uso fwh 8.02

Gracias

[Armando Picon]

Luis

en mi caso detecto perfectamente la conexion a internet. Esta es el trozo de codigo que opera:
...
...
If ! IsInternet()

MsgStop( "No hay conexion a Internet", "Atención" )

Return Nil

EndIf

...
...

Lo que si debo advertir es que cuando hay muchos destinatarios, no tengo mensaje que esta trabajando el sistema. El tiro seria, me parece, colocar algun indicador que esta trabajando o hacer que siga corriendo mientras se continua en otras tareas. Por ahora no me ha sido necesario dotar a mi programa de estas peculiaridades ---por flojera digo yo.

Saludos

Armando

[jll-fwh]

Hola Luis Ponce:

Yo uso la version 8.12 y no tengo problemas, ya sea en XP o Windows 7.

Si quieres que te envie mi fuente y lo pruebas tu, dimelo y te lo envio al correo.

jllorispersonal@ono.com

Un saludo
JLL

[LuisPonce]

Hola Armando y JLL

Gracias por las respuestas, pero sigo sintiendo pesado el sistema, se cuelga, es decir se queda estatico y salen esos mensajes hb.......

Si, me gustaria que me envies un ejemplo, para porderlo comparar con mi aplicacion, a lo mejor el CDOSYS.ch es distinto GRACIAS

Mi mail es la_ponce@hotmail.com

Saludos desde Peru