Page 1 of 2

Funcionan los sockets ?

Posted: Fri May 16, 2008 11:18 pm
by Salvador
Antonio.

Este codigo:

Code: Select all

#include "fwce.ch"

Function Main()

LOCAL oWnd, oSocket
   
    DEFINE WINDOW oWnd TITLE "Test de sockets";
   
     oSocket := Tsocket():New( )

    ACTIVATE WINDOW oWnd 

RETURN .t.
en el emulador muestra el siguiente mensaje de error "Fix GPFStack()!" .

Puedes darme alguna indicación?.

Gracias.
Salvador Gallardo

Posted: Sat May 17, 2008 8:42 am
by Antonio Linares
Salvador,

Pruébalo así:

Code: Select all

#include "fwce.ch" 

Function Main() 

LOCAL oWnd, oSocket 
    
    DEFINE WINDOW oWnd TITLE "Test de sockets"; 
    
    ACTIVATE WINDOW oWnd ;
       ON INIT oSocket := Tsocket():New( ) 

RETURN .t.

Posted: Sat May 17, 2008 10:24 pm
by Salvador
Antonio sigue dando el mismo error. :(

Posted: Sat May 17, 2008 11:13 pm
by Antonio Linares
Salvador,

Acabamos de probar fwppc\samples\sockcli.prg y funciona correctamente, sin GPFs.

Puedes probarlo y comprobar si te da error ? gracias

Posted: Sun May 18, 2008 12:52 am
by Salvador
Antonio,
Tienes razón, no se produce el error. Que falla en mi código?.
De que modo hay que configurar el emulador para poder hacer pruebas con sockserv.prg tal como explicas en:
http://www.fivetechsoft.com/forums/view ... ht=sockets

Gracias.
Salvador Gallardo

Posted: Sun May 18, 2008 7:46 am
by Antonio Linares
Salvador,

El fallo posiblemente se debe a que no estas especificando el puerto a usar por el socket ni la ventana a la que enviar los eventos:

TSocket():New( 200, oWnd ) // puerto 200, oWnd ventana para eventos

Posted: Sun May 18, 2008 7:48 am
by Antonio Linares
Salvador,

Para poder hacer pruebas con sockserv.exe desde el PC, necesitas configurar la red en el Pocket PC en el emulador.

Intenta primero configurar el Pocket PC para acceder a Internet, y eso será suficiente. Que puedas acceder a google, etc. desde el navegador del Pocket PC

Posted: Sun May 18, 2008 7:53 am
by Antonio Linares
Image

Posted: Sun May 18, 2008 1:23 pm
by Salvador
Antonio,
Sigue sin funcionar.
Tengo acceso a internet desde el emulador. Hecompilado sockcli.prg con buildce.bat y lo he copiado al emulador.
En el pc tengo sockcli y sockserv para harbour y se comunican entre ellos sin problemas.
Pero entre sockcli del emulador y sockserv del pc no se prooduce la comunicación.
El fuente de sockcli es el mismo tanto para Fwh como Fwppc.
Estoy convencido que algo no funciona en la clase de Fwppc. Podeis probarlo de nuevo por favor.

El build de Fwppc es de septiembre 2007

Gracias.
Salvador Gallardo

Posted: Mon May 19, 2008 8:31 am
by Antonio Linares
Salvador,

Vamos a probarlo y te comentamos

Posted: Tue May 20, 2008 12:37 pm
by Antonio Linares
Salvador,

Efectivamente se está produciendo el error que comentas.

Vamos a revisarlo para ver que puede estar ocurriendo

Posted: Sun May 25, 2008 10:52 am
by Salvador
Antonio,

Alguna novedad con los sockets ?.

Posted: Sun May 25, 2008 5:28 pm
by Antonio Linares
Salvador,

Estamos cercanos a terminar un nuevo build de FWPPC, con nueva versión de Harbour, y en donde vamos a revisar los sockets.

En sólo unos dias te podremos dar la respuesta, gracias

Posted: Mon May 26, 2008 9:17 am
by Salvador
Antonio,

No teníamos ya soporte de sockets ?.

http://www.fivetechsoft.com/forums/view ... ht=sockets

Posted: Mon May 26, 2008 12:54 pm
by Antonio Linares
Salvador,

Si, y estaban funcionando bien.

Lo que estamos es intentando localizar que le ha podido ocurrir. Al mismo tiempo estamos trabajando sobre un nuevo build de FWPPC, por eso que el tema se nos esté haciendo un poco más dificil.

A ver si encontramos el fallo cuanto antes