مشکل با نوتیفیکیشن

[sejil 180]

با سلام خدمت دوستان

 

یه مشکل با نوتیفیکیشن پیدا کردم که فقت یه بار اجرا میشه

تو یه اکتیویتی نوشتم که یه فایل از سایت دانلود کن بعد ببین اگه 1 بود سرویسو اجرا کن ولی فقط یه بار میشه اجراش کرد یعنی بعد نصب فقط یه بار

اینم سورس اگه میشه کمک کنید ، مرسی

 

activity

Sub JobDone(Job As HttpJob)
If Job.Success=True Then
If Job.JobName = "ht" Then
Dim vorod = ht.GetString As String
If vorod = "1" Then
StartService(Notification)
End If
End If
End sub

service

#Region  Service Attributes 
	#StartAtBoot: False
#End Region

Sub Process_Globals
	Dim noti As Notification
	Dim tn1 As Timer
	Dim newsmtn As HttpJob 
	Dim sejilnewstitle As HttpJob 
End Sub
Sub Service_Create
	sejilnewstitle.Initialize("sejilnewstitle",Me)
	sejilnewstitle.Download("http://....wstitle.txt")
	newsmtn.Initialize("newsmtn",Me)
	newsmtn.Download("http://.........smtn.txt")
	tn1.Initialize("tn1",60000)
	tn1.Enabled=True
	noti.initialize
	noti.Icon="icon"
	noti.light= True
	noti.ongoingevent = True
	noti.vibrate = False
End Sub

Sub Service_Start (StartingIntent As Intent)
	
End Sub

Sub Service_Destroy
	noti.cancel(1)
End Sub

Sub tn1_tick
	tn1.Enabled=False
	noti.cancel(1)
End Sub

Sub jobdone(job As HttpJob)
	If job.Success=True Then
		If job.JobName = "newsmtn" Then
			noti.setinfo(sejilnewstitle.GetString,newsmtn.GetString,AboutMe)
			noti.notify(1)
		End If
	End If
End Sub

کارش اینه که بعد اجرا اگه اون فایله 1 بود سرویسو اجرا کنه و بعد 60 ثانیه کنسلش کنه

اما بعدش که میای اجرا میکنیم نرم افزار دیگه سرویس اجرا نمیشه

[sejil 180]

اساتید لطفا کمک کنید لازمش دارم :(

[sejil 180]

کسی نمیتونه کمک کنه؟