Visual Basic - Extraer coordenadas de GPS. con Visual Basic 6.0

Life is soft - evento anual de software empresarial
   
Vista:

Extraer coordenadas de GPS. con Visual Basic 6.0

Publicado por Javier (18 intervenciones) el 16/09/2008 21:52:32
Hola:

Necesito hacer una aplicación en VB6.0 para extraer las coordenadas de un GPS. He visto el codigo para NET pero de NET estoy pegado. ¿Alguien puede pasarme un código para ver en pantalla las coordenadas del GPS?

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por Javier (18 intervenciones) el 16/09/2008 21:55:02
Se me olvidaba comentar que el GPS está conectado al USB.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por igor (633 intervenciones) el 17/09/2008 21:21:20
También se te olvida poner el código NET, yo me pego con NET y con cualquiera que quiera hacer GPS por la FACE.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por Javier (18 intervenciones) el 18/09/2008 13:36:11
Pues aquí lo tienes:

tmrGPS es un control timer.

Private s As String

Private Sub tmrGPS_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmrGPS.Tick
If s = "" Then Exit Sub

Dim LastSt As String = s

Dim Fields() As String

Dim Lecturas() As String
Dim Lectura As String

'Sumamos uno para asegurarnos que tenemos al menos un $
LastSt = LastSt.Substring(0, LastSt.LastIndexOf("$"))
'vaciamos la cadena original quedandonos con el último $
'TODO:
'Comprobar que s contiene lo que debería contener.
s = s.Substring(LastSt.Length)

'Cojemos las lecturas en un Array
Lecturas = LastSt.Split(search)
For Each Lectura In Lecturas
'Procesamos cada una de las lecturas
Fields = Lectura.Split(",")
Select Case Fields(0)
Case "GPGGA"
'Los indices que nos interesan, de momento son:
'1.- Hora (hhmmss.ss)
'2.- Latitud (dddmm.mmm) grados y minutos
'3.- N o S (latitud)
'4.- Longitud (dddmm.mmm) grados y minutos
'5.- E o W (longitud)
'7.- Numero de Satelites.
'9.- Altitud sobre el nivel del mar
'10.- Unidades de la altitud, deberían ser M
Me.lblTime.Text = Formatos.strTime(Fields(1))
Me.lblLatitud.Text = Fields(2)
Me.lblLat.Text = Fields(3) 'Norte (N) o Sur (S)
Me.lblLongitud.Text = Fields(4)
Me.LblLong.Text = Fields(5) 'Este (E) u Oeste (W)
Me.lblSatelites.Text = Fields(7)
Me.lblAltitud.Text = Fields(9)
Me.lblUnits.Text = Fields(10)
Conversion.ToUTM(Me.lblLatitud.Text, Me.lblLongitud.Text)

Case Else
'De momento ignoramos el resto de lecturas.
'Es posible que en un futuro queramos hacer algo con otras lecturas
'Por eso de momento usamos un SELECT CASE en ve de un IF.
End Select

Next Lectura
Me.txtLed.Visible = Not Me.txtLed.Visible

End Sub
final de tabla
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por igor (633 intervenciones) el 18/09/2008 22:11:30
Para manipulación de cadenas puedes usar las funciones Left$(cadena,longitud), Right$(cadena,longitud), mid$(cadena,inicio,longitud) además de la de split().

El código de NET es similar utilizando string.split o string.substring para manipular cadenas.

Podrías indicar de donde obtienes los datos del GPS?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por javier (18 intervenciones) el 21/09/2008 19:47:18
El texto que mandé es en NET y necesito trabajarlo en VB6.0 pero el objeto que figura en las líneas de código no existe en 6.0.

Los datos de GPS
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por Javier (18 intervenciones) el 21/09/2008 19:54:24
Los datos del GPS los extraigo de una antena conectada al USB mediante un conversor a puerto serie que mi PC reconoce como COM5
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Extraer coordenadas de GPS. con Visual Basic 6.

Publicado por Javier (1 intervención) el 20/11/2008 20:22:34
como extraes los datos del gps, yo tengo lo mismo pero en el puerto 27.. y tengo rutinas que no funciona porque dice que el puerto ta denegado..... }

saludos, espero tu respuesta
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar