Tengo una aplicación que se comunica con un server mediante sockets.
La conexión funciona si se especifica la dirección ip del server, en cambio si se hace con un nombre de host contratado con “dyndns.com” por ejemplo “mihost.dyndns.org”, la conexión no funciona.
¿Alguien sabe porque?
Gracias de antemano.
Hola Salvador
Como haces la apertura del socket?
muestra el codigo de conexion por favor
oSocket := TSocket():New( 8083 )
oSocket:bConnect := { | oSocket | Send(oSocket) }
oSocket:bRead := { | oSocket | CogeDato( oSocket ) }
oSocket:bClose := { || MsgInfo( "Server has closed!" ) }
oSocket:Connect( "miserver.dyndns.org", 8083 ) // no conecta estando sincronizada la IP del server con el dominio
oSocket:Connect("83.56.196.122", 8083 ) // si conecta
Daniel, gracias por tu interés.
Hola Salvador...
No se que version usa...
verifica que la clase TSocket que usas hace el llamado a la funciuon GetHostByName( AllTrim( cIPServer ) ) , para que reconozca la direccion IP character y la convierta en IP valida, sino haces el llamado a esa funcion primero para que te retorne dicha "ip valida"
nIP = GetHostByName( "miserver.dyndns.org" )
Parece ser que la clase Tsocket necesita una dirección ip como parámetro.
Haciendolo de esta manera: oSocket:Connect(GetHostByName("myserer.dyndns.org"), 8083 ), la aplicación queda colgada en este punto y hay que resetear el Smartphone.
Al parecer la función GetHostByName no funciona correctamente Windows Mobile 6.
#pragma BEGINDUMP
#include <hbapi.h>
#include <windows.h>
#include <WinSock.h>
static HB_FUNC( GETHOSTBYNAME ) // ( cName ) --> cIPAddress
{
struct hostent * pHost;
char addr[ 20 ];
strcpy( ( char * ) addr, "0.0.0.0" );
if(( pHost = gethostbyname( hb_parc(1) ) ) != NULL )
{
sprintf( ( char * ) addr, "%i.%i.%i.%i",
( BYTE ) pHost->h_addr[ 0 ], ( BYTE ) pHost->h_addr[ 1 ],
( BYTE ) pHost->h_addr[ 2 ], ( BYTE ) pHost->h_addr[ 3 ] );
}
hb_retc( ( char * ) addr );
}
//---------------------------------------------------------------------------//
#pragma ENDDUMPTu código me genera estos errores:
error C2065: 'strcpy_instead_use_StringCbCopyA_or_StringCchCopyA' : undeclared identifier
error C2065: 'sprintf_instead_use_StringCbPrintfA_or_StringCchPrintfA' : undeclared identifier
Estas funciones estan declaradas en "stdlib.h" y esta incluida en el proyecto, quizás tengo alguna opción incorrecta en el compìlador.
De todas formas tu código es similar al de la función GetHostByName() que se encuentar en "c:\Fwppc\source\functions\winapi\winsock.c" y que es llamada desde de la clase Tsocket original de Fwppc.
#include "FWCE.ch"
static oWnd, oSocket
function Main()
local oBtn1, oGetIP
local cIP := Space( 100 )
WSAStartup()
DEFINE WINDOW oWnd TITLE "Test socket"
@ 5, 2 BUTTON oBtn1 PROMPT "Connect" ;
ACTION MsgInfo( GetHostByName( AllTrim( cIP ) ) ) SIZE 80, 20
@ 2,2 GET oGetIP VAR cIP SIZE 200,20
ACTIVATE WINDOW oWnd
return nil
//------------------------------------------------------------//
#pragma BEGINDUMP
#include <hbapi.h>
#include <windows.h>
#include <WinSock.h>
static HB_FUNC( GETHOSTBYNAME ) // ( cName ) --> cIPAddress
{
struct hostent * pHost;
char addr[ 20 ];
strcpy( ( char * ) addr, "0.0.0.0" );
if(( pHost = gethostbyname( hb_parc(1) ) ) != NULL )
{
sprintf( ( char * ) addr, "%i.%i.%i.%i",
( BYTE ) pHost->h_addr[ 0 ], ( BYTE ) pHost->h_addr[ 1 ],
( BYTE ) pHost->h_addr[ 2 ], ( BYTE ) pHost->h_addr[ 3 ] );
}
hb_retc( ( char * ) addr );
}
//---------------------------------------------------------------------------//
#pragma ENDDUMPGracias por el ejemplo, funciona perfectamente.
Voy a ver si consigo eliminar los errores al compilar tu función.
Gracias de nuevo por tu atención.