Sub Service_Create
sNotif.Initialize
sNotif.Icon = "icon"
sNotif.Vibrate=False
sNotif.SetInfo2("GPSPinger","Service Running","FromNotification",Main) 'If the notification is clicked, the main activity will be started
sNotif.Sound = False
sNotif.Notify(1)
Service.StartForeground(1,sNotif)
End Sub