Funcionan los sockets ?

Funcionan los sockets ?

Postby Salvador » Fri May 16, 2008 11:18 pm

Antonio.

Este codigo:
Code: Select all  Expand view
#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
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Sat May 17, 2008 8:42 am

Salvador,

Pruébalo así:
Code: Select all  Expand view
#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.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Salvador » Sat May 17, 2008 10:24 pm

Antonio sigue dando el mismo error. :(
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Sat May 17, 2008 11:13 pm

Salvador,

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

Puedes probarlo y comprobar si te da error ? gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Salvador » Sun May 18, 2008 12:52 am

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
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Sun May 18, 2008 7:46 am

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
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Antonio Linares » Sun May 18, 2008 7:48 am

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
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Antonio Linares » Sun May 18, 2008 7:53 am

Image
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Salvador » Sun May 18, 2008 1:23 pm

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
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Mon May 19, 2008 8:31 am

Salvador,

Vamos a probarlo y te comentamos
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Antonio Linares » Tue May 20, 2008 12:37 pm

Salvador,

Efectivamente se está produciendo el error que comentas.

Vamos a revisarlo para ver que puede estar ocurriendo
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Salvador » Sun May 25, 2008 10:52 am

Antonio,

Alguna novedad con los sockets ?.
Saludos
Salvador
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Sun May 25, 2008 5:28 pm

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
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Salvador » Mon May 26, 2008 9:17 am

Antonio,

No teníamos ya soporte de sockets ?.

http://www.fivetechsoft.com/forums/view ... ht=sockets
Saludos
Salvador
Salvador
 
Posts: 144
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Postby Antonio Linares » Mon May 26, 2008 12:54 pm

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
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41366
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Next

Return to FiveWin para Pocket PC

Who is online

Users browsing this forum: No registered users and 8 guests