FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC Manejo de funciones para conexiones gprs
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
Manejo de funciones para conexiones gprs
Posted: Thu Oct 25, 2007 03:34 PM

Hola a todos.
Ahora mismo estoy metido con las conexiones por gprs. Mi intenci贸n es que desde c贸digo puede lanzar la conexi贸n, ver el estado y desconectarla. Gracias al amigo Biel que me ha suministrado estas funciones he empezado a mirarlas pero no se como usarlas. Las funciones, para empezar son estas:

HB_FUNC (GPRSCONNECT)
{
HANDLE phWebConnection = NULL;
DWORD pdwStatus = 0;

ConnMgrConnectionStatus (phWebConnection, &pdwStatus);
if (pdwStatus == CONNMGR_STATUS_CONNECTED)
{
hb_retl (TRUE);
}
else
{
CONNMGR_CONNECTIONINFO sConInfo;
memset (&sConInfo,0, sizeof (CONNMGR_CONNECTIONINFO));
sConInfo.cbSize = sizeof (CONNMGR_CONNECTIONINFO);
sConInfo.dwParams = CONNMGR_PARAM_GUIDDESTNET;
sConInfo.dwPriority = CONNMGR_PRIORITY_USERINTERACTIVE;
sConInfo.dwFlags = CONNMGR_FLAG_PROXY_HTTP;
sConInfo.bExclusive = FALSE;
sConInfo.bDisabled = FALSE;
sConInfo.guidDestNet = IID_DestNetInternet;

  if (ConnMgrEstablishConnection (&sConInfo, &phWebConnection) == S_OK) 
  { 
     unsigned int k;

     for( k = 0; k < 8; k ++) 
     { 
        ConnMgrConnectionStatus(phWebConnection,&pdwStatus); 
        if (pdwStatus == CONNMGR_STATUS_CONNECTED) 
        { 
           hb_retl (TRUE); 
        } 
        else 
        { 
           if (pdwStatus == CONNMGR_STATUS_CONNECTIONCANCELED || pdwStatus == CONNMGR_STATUS_WAITINGCONNECTIONABORT) 
           { 
              hb_retl (FALSE); 
           } 
           Sleep (2500); 
           ConnMgrConnectionStatus (phWebConnection, &pdwStatus); 
           if (pdwStatus == CONNMGR_STATUS_WAITINGCONNECTION) 
           {} 
           if (pdwStatus == CONNMGR_STATUS_CONNECTIONCANCELED || pdwStatus == CONNMGR_STATUS_WAITINGCONNECTIONABORT) 
           { 
              hb_retl (FALSE); 
           } 
        } 
     } 
     hb_retl (FALSE); 
  } 
  else 
  { 
     hb_retl (FALSE); 
  }

}
}

Si alguien puede echarme una mano para ver como puedo llamar a esas funciones se lo agradeceria....

Saludos.

El铆as Torres.

Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
Manejo de funciones para conexiones gprs
Posted: Thu Oct 25, 2007 03:59 PM

Hola a todos....

Ya he conseguido que me haga la conexi贸n desde c贸digo, pero no consigo que me desconecte una vez enviado el fichero.

La funci贸n que estoy utilizando es:

HB_FUNC (GPRSRELEASE)
{
HANDLE hCon= NULL;
ConnMgrReleaseConnection( ( HANDLE ) hb_parnl( 1 ),2 );
}

Nose si me falta algo..No da error pero no me desconecta.. Alguna idea??

Saludos.

El铆as Torres.

Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM
Manejo de funciones para conexiones gprs
Posted: Fri Oct 26, 2007 07:12 AM

Hola Elias,
La funci贸n GprsConnect que te pase, tiene un peque帽o cambio con respecto a la de Pawel, y es que en lugar de devolver verdadero o falso, devuelve el numero de handler de la conexion.
Guarda ese numero en una variable, y despues pasalo como parametro a GprsRelease.

Espero te funcione.

Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
Manejo de funciones para conexiones gprs
Posted: Fri Oct 26, 2007 09:10 AM

Biel, gracias por la ayuda. He hecho lo que me comentabas y todo ha funcionado correctamente....

Saludos.

El铆as Torres.

Posts: 298
Joined: Fri Oct 07, 2005 05:20 AM
Manejo de funciones para conexiones gprs
Posted: Fri Oct 26, 2007 08:07 PM
Elias Torres wrote:Biel, gracias por la ayuda. He hecho lo que me comentabas y todo ha funcionado correctamente....


Saludos.

El铆as Torres.


Que versi贸n de FWPCC y de Wmobile est谩n usando ?
Vikthor
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
Manejo de funciones para conexiones gprs
Posted: Mon Oct 29, 2007 09:25 AM

Hola Viktor.

Estoy usando el build de febrero '07 y el compilador del Harbour es 46.2 (Flex). En cuanto a WMobile utilizo una PDA Qtek s200 con Windows Mobile 5 y todo me ha funcionado perfectamente gracias a la ayuda de Biel.

Saludos.
El铆as Torres.

Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Manejo de funciones para conexiones gprs
Posted: Mon May 12, 2008 01:58 PM

Biel.
Podr铆as postear las funciones para GPRS con las modificaciones que agregaste.
En que versi贸n de Windows las has utilizado ?.
Gracias.

Salvador Gallardo.

Saludos

Salvador
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM
Manejo de funciones para conexiones gprs
Posted: Tue May 13, 2008 08:39 AM
Hola Salvador,
estas son las funciones que uso para conexion y desconexion GPRS. Las he probado con Windows mobile 2003 y 2005. Esta funcion la posteo en el foro Pawel, yo solo le hecho un peque帽o cambio.

HB_FUNC (GPRSCONNECT)
{
   // By Pawel 
   HANDLE phWebConnection = NULL;
   DWORD pdwStatus = 0;
   //Comprobamos si ya estamos conectados.
   ConnMgrConnectionStatus (phWebConnection, &pdwStatus);
   if (pdwStatus == CONNMGR_STATUS_CONNECTED) 
   {
      hb_retnl( (long) 0 );
   }
   else
   {
      //No estamos conectados.
      //CONNECTIONINFO es la estructura que
      //le indica al Connection manager como nos queremos conectar.
      CONNMGR_CONNECTIONINFO sConInfo;
      memset (&sConInfo,0, sizeof (CONNMGR_CONNECTIONINFO));
      sConInfo.cbSize = sizeof (CONNMGR_CONNECTIONINFO);
      sConInfo.dwParams = CONNMGR_PARAM_GUIDDESTNET; //Queremos usar parametros "GuisDesNet"
      sConInfo.dwPriority = CONNMGR_PRIORITY_USERINTERACTIVE; //Esta es la prioridad mas alta.
      sConInfo.dwFlags = CONNMGR_FLAG_PROXY_HTTP;
      sConInfo.bExclusive = TRUE ; //Permitimos compartir la conexion con otras aplicaciones.
      sConInfo.bDisabled = FALSE;
      sConInfo.guidDestNet = IID_DestNetInternet;

      if (ConnMgrEstablishConnection (&sConInfo, &phWebConnection) == S_OK)
      {
         for (unsigned int k = 0; k < 8; k ++)
         {
            ConnMgrConnectionStatus(phWebConnection,&pdwStatus);
            if (pdwStatus == CONNMGR_STATUS_CONNECTED)
            {
               hb_retnl( (long) phWebConnection );
            }
            if (pdwStatus == CONNMGR_STATUS_CONNECTIONCANCELED || pdwStatus == CONNMGR_STATUS_WAITINGCONNECTIONABORT)
            {
               hb_retnl( (long) -1 );
            }
            Sleep (2500);
         }
         hb_retnl( (long) phWebConnection );
      }
      else
      {
         hb_retnl( (long) -1 );
      }
   }
}


HB_FUNC (GPRSRELEASE)
{
   HANDLE hCon= NULL;
   ConnMgrReleaseConnection( ( HANDLE ) hb_parnl( 1 ),2 );
}
Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Manejo de funciones para conexiones gprs
Posted: Thu Jun 05, 2008 06:27 PM

Muchas gracias Biel. :D

Saludos

Salvador
Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Manejo de funciones para conexiones gprs
Posted: Thu Jun 05, 2008 06:27 PM

Muchas gracias Biel. :D

Saludos

Salvador

Continue the discussion