[wolfgang]

Hi,
I have had the same problem with my HTC 3650 Cruise WM 6.0 Pro but it is solved now with the GPSINT lib from hsandy. The following code runs without any problem on my device.

Sub Globals
	n = 0
End Sub

Sub App_Start
	Form1.Show
	hw.New1
	gpsint.New1
End Sub

Sub gpsint_GPSLocationChanged
	If gpsint.GPSValid = true Then
		n = n + 1
		label2.Text = gpsint.GPSUTCTime
		label6.Text = gpsint.GPSSpeed & " [knots]"
		label4.Text = n
		Else
			label2.Text = "no fix, wait"
	End If
	hw.KeepAlive
End Sub

Sub btstart_Click
	If btstart.Text = "Start" Then
		gpsint.openGPS
		btstart.Text = "Stop"
		Else
			gpsint.closegps
			btstart.Text = "Start"
			n = 0
	End If
End Sub

Sub Form1_Close
	gpsint.closegps
	gpsint.Dispose
End Sub

The only thing I do not understand is that label4.Text = n displays only even numbers ( divided by 2 and everything is o.k.). The next HTC GPS problem is that the STATIC-MODE is turned on, which means that under a speed of 2 knots the speed and heading is frozen.

In case off all this problems I phoned with the German support and the answer was: “We do only support TomTom”.

So take care when you buy a HTC.