Lectura De Coordenadas De Gps
Buenas, os voy a poner los pasos para leer las coordenadas del GPS.
Las coordenadas se obtienen mediante el puerto COM, que tenga configurado el PDA para acceder alGPS. En mi caso es el COM4, eso lo miráis en la configuración del PDA. (Si no lo encontráis, id probando :D )
Bueno, al lio!
En el form añadir dos labels, txtLong y txtLat. Un botón llamadobtnEmp. Además añadir un control SerialPort y un Timer.
Ahora pasamos a codificar.
Primero añadimos las librerias:
Imports System
Imports System.Collections.Generic
Imports System.ComponentModelImports System.Drawing
Imports System.Text
Imports System.Windows.Forms
Imports System.IO.Ports
Creamos las variables:
#Region "Variables"
Public Latitud As String
Public Longitud As String#End Region
Ahora vamos a crear el constructor:
#Region "Constructor"
Public Sub New()
' Esto es necesario
InitializeComponent()
' Aqui intentamos abri el puerto
Try
SerialPort1.PortName ="COM4"
SerialPort1.Open()
Catch ex As Exception
MessageBox.Show(ex.Message)
Timer1.Enabled = False
btnEmp.Text = "Empezar"
Return
End Try
End Sub
#End Region
Creamos el código del botón,se limitara a apagar o encender el Timer:
Private Sub btnEmp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEmp.Click
'Comprobamos el estado del timer y lo invertimos.If Timer1.Enabled = True Then
Timer1.Enabled = False
Else
Timer1.Enabled = True
End If
If btnEmp.Text = "Empezar" Then
btnEmp.Text = "Parar"
Else
btnEmp.Text = "Empezar"
End If
End SubBueno ya nos queda configurar el Timer. Por el puerto Com entran muchas lineas de datos llamadas NEMA.
El código comprueba en primer luga, si el puerto serie está abierto , si lo es, lee la salida dedatos en una cadena. Cada linea se separa con el simbolo del dolar $ . La cadena que nos interes, comienza por "GPGGA"; este subcadena contiene la latitud y la longitud, además de más información,...
Regístrate para leer el documento completo.