conectarte por gprs desde un tsm500 de telefonica

gracias a todos ya lo he conseguido




"Francisco Jimenez" escribió en el mensaje
news:

Gracias ante todo.

Me gustaria saber la forma de conectarme desde codigo a una conexion gprs
existente desde un telefono/palm (tsm500) de telefonica.

yo he utilizado este codigo y utilizo la siguiente libreria.

Public connMgr As New OpenNETCF.Net.ConnectionManager

Public pru As New OpenNETCF.Net.DestinationInfoCollection


Try

pru = New
OpenNETCF.Net.DestinationInfoCollection(connMgr.EnumDestinations())

Dim s As Int16

For s = 0 To pru.Count - 1

If pru(s).description = "INTERNET" Then Exit For

next

connMgr.Connect(pru(s).guid, True,
OpenNETCF.Net.ConnectionMode.Asynchronous)


End If

Catch ex As Exception

MsgBox("No se puede realizar la conexión INTERNET")

End Try

FALSA ALARMA. SIGUE SIN CONECTAR
"Francisco Jimenez" escribió en el mensaje
news:epvRWQ%

gracias a todos ya lo he conseguido




"Francisco Jimenez" escribió en el
mensaje news:

Gracias ante todo.

Me gustaria saber la forma de conectarme desde codigo a una conexion gprs
existente desde un telefono/palm (tsm500) de telefonica.

yo he utilizado este codigo y utilizo la siguiente libreria.

Public connMgr As New OpenNETCF.Net.ConnectionManager

Public pru As New OpenNETCF.Net.DestinationInfoCollection


Try

pru = New
OpenNETCF.Net.DestinationInfoCollection(connMgr.EnumDestinations())

Dim s As Int16

For s = 0 To pru.Count - 1

If pru(s).description = "INTERNET" Then Exit For

next

connMgr.Connect(pru(s).guid, True,
OpenNETCF.Net.ConnectionMode.Asynchronous)


End If

Catch ex As Exception

MsgBox("No se puede realizar la conexión INTERNET")

End Try

Todo esto en una pda de telefonica "tsm500"

Ya estoy en duda.

Ya no me da error aparentemente se conecta, porque las flechitas que indican
si tiene conexiion o no aparecen como que hay conexion pero luego miro si
hay una conexion activa y no hay ninguna.

Hago lo siguente

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
'combo donde almaceno todas las conexiones que tiene la pda

Conexion.Items.Clear()

pru = New
OpenNETCF.Net.DestinationInfoCollection(connMgr.EnumDestinations())

For s = 0 To pru.Count - 1

conexion.Items.Add(pru(s).description)

Next

End Sub





y luego una vez seleccionado una conexion del combo le doy al boton
<conectar>



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

'Aquí conecta el GPRS

EXISTE = False

For s = 0 To pru.Count - 1

If pru(s).description = conexion.Text.Trim Then

EXISTE = True

Exit For

End If

Next

If EXISTE = True Then

connMgr.Connect(pru(s).guid, True,
OpenNETCF.Net.ConnectionMode.Asynchronous)

Else

MsgBox("NO EXISTE LA CONEXION SELECCIONADA")

End If

End Sub


En la parte de conectividad de la pda me aparecen 2 conexiones
"INTERNET" = gprs
"Internet Directo" =linea celular

En el combo donde almaceno todos los nombres de las conexiones me aparece
una que se llama "INTERNET GPRS" que ese es el nombre de configuracion de la
conexion "INTERNET"
si le digo que conecte a internet lo hace todo ok aparentemente pq luego
miro en conectividad y la conexion "INTERNET " no me aparece como
"Conectada"

Hago lo mismo con "Internet Directo" y me ocurre mas de lo mismo.


Muchas gracias y espero vuestra respuesta