Test is GPS exists?

[KeithGanzenmuller]

Does anyone know how to check if the device has a GPS or not?
We'll be running arcpad on several different laptops, some with and some without GPS. I would like to test for the existence of a GPS device before attempting to open an non-existent one and throwing an error message.
I thought about using isObject(GPS) but it looks like the GPS object gets created regardless of whether a GPS exists or not.


Thanks,

Keith

[ThaiTruong · Accepted solution]

You can try to use both, IsOpen property and Open method to check and see if there's a GPS device

Dim blnHasGPS If Not Application.GPS.IsOpen Then  blnHasGPS = Application.GPS.Open  If blnHasGPS Then   'Has a GPS device  Else   'Doesn't have a GPS device  End If Else  'Already has a GPS device and the communication is established End If

GPS Object also provides other properties for you to check the signal quality...
Hope this helps.