TENGO LO SIGUIENTE:
Desde un celular envío mensajes de alerta a un servidor a través del puerto 80 dando aviso de una alarma.
Para ello pulso un botón y una ID de usuario y la IP publica es enviada a un servidor externo en donde se procesan los datos.
ME FALTA:
La IP sólo me identifica el router desde donde envío el ID pero no se como "escucharlo" con 4BA en mi aplicacion.
Necesitaría hacerlo por ejemplo a través de un puerto abierto:
Ejemplo el puerto 441 que utiliza WathsApp algo así 181.167.2.34:441
(esto si abrir o redireccionar los puertos de mi router)
En el celular donde instalo mi aplicacion 4BA necesitaría "escuchar" ese puerto y allí recibir los datos
Con esto envío a través del puerto 80 la data a mi server: (funciona muy bien)
' CONFIGURACION IP OF MY SERVER
Host="http://192.168.1.164"
Sub Imageview1_Click
'status =1 (alarm off)
'status =2 (alarm on)
'grupo is a user group
'id is my user id
Dim j As HttpJob
j.Initialize("", Me)
j.Download( Host & "/alerta/index.php?id=1001&status=2&grupo=3")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Label1.Text = j.GetString
End If
j.Release
End Sub
---------------------------------------------
When the server receive the alarm data into my server I save the ID , Status,group an n the IP of my conexion, but the IP, is the IP Router where my phone and my PC is connected.
How I hear one port with the data in that IP in my Phone with B4A?
SERVER SEND DATA TO MY PHONE DIRECTLY TO PUBLIC IP AND I MUST HEAR THE DATA IN ONE PORT.
PLEASE HELP ME !!!
THANKS
Desde un celular envío mensajes de alerta a un servidor a través del puerto 80 dando aviso de una alarma.
Para ello pulso un botón y una ID de usuario y la IP publica es enviada a un servidor externo en donde se procesan los datos.
ME FALTA:
La IP sólo me identifica el router desde donde envío el ID pero no se como "escucharlo" con 4BA en mi aplicacion.
Necesitaría hacerlo por ejemplo a través de un puerto abierto:
Ejemplo el puerto 441 que utiliza WathsApp algo así 181.167.2.34:441
(esto si abrir o redireccionar los puertos de mi router)
En el celular donde instalo mi aplicacion 4BA necesitaría "escuchar" ese puerto y allí recibir los datos
Con esto envío a través del puerto 80 la data a mi server: (funciona muy bien)
' CONFIGURACION IP OF MY SERVER
Host="http://192.168.1.164"
Sub Imageview1_Click
'status =1 (alarm off)
'status =2 (alarm on)
'grupo is a user group
'id is my user id
Dim j As HttpJob
j.Initialize("", Me)
j.Download( Host & "/alerta/index.php?id=1001&status=2&grupo=3")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Label1.Text = j.GetString
End If
j.Release
End Sub
---------------------------------------------
When the server receive the alarm data into my server I save the ID , Status,group an n the IP of my conexion, but the IP, is the IP Router where my phone and my PC is connected.
How I hear one port with the data in that IP in my Phone with B4A?
SERVER SEND DATA TO MY PHONE DIRECTLY TO PUBLIC IP AND I MUST HEAR THE DATA IN ONE PORT.
PLEASE HELP ME !!!
THANKS
Last edited:
