مشکل کار نکردن سرویس

[sorena.king.24 11]

سلام

من یه برنامه معکوس زمان دارم درست میکنم که سره نیم ساعت بهم هشدا بده خب

ولی وقتی میره در حالت خواب سرویس متوقف میشه اونم وحشت ناااک

چیکار کنم که درست شه این دوتا کد هم استفاده کردم ولی بازم فایده نداشت

#Region  Service Attributes 
	#StartAtBoot: false
	#StartCommandReturnValue: android.app.Service.START_STICKY
#End Region

Sub Service_Start (StartingIntent As Intent)
		StartServiceAt(Me, DateTime.Now + 1000 * 60 , True)
End Sub

دیگه موندم چیکار کنم درست کار کنه

لطفا بهم کمک کنید

خییلیی نیاز دارم

ممنون

[[email protected] 6]

در 1 ساعت قبل، پژمان نیکروان گفته است :

سلام

دوستان شاید بتونیم بگیم روشی استاندارد تر از آموزشی که قبلا گذاشته بودم توسط برادکست رسیور و سرویس وجود داره.

خود اندروید کلاسی داره به نام AlarmManager که دارم روش کار میکنم تا بتونیم کتابخانشو در بیسیک داشته باشیم. این دیگه نیازی به سرویس نداره. یعنی درواقع خودش یک BroadCastReceiver هست و درهرحالت اعلان رو میده.

 

سلام جیگر برادر

 

این کتابخانه ای قرار بود برا گرفتن عکس از گوشی که کاربر خودش میگیره رو ( مسیر و نام عکس رو بده ) ننوشتی برادر 

[sorena.king.24 11]

در در 1396/01/19, 17:07:04، mirtalebi گفته است :

سلام دوست عزیز 

اگر کد زیر رو بنویسی برنامه یه نوتیفیکیشن میده و اندروید اونو نمیبنده چون کاربر از اجرای اون خبر داره من از این کد استفاده کردم درست شد حتی توی اندروید 6!!!

اگر خوشت اومد پسندیدم رو بزن!!!

مشکلی بود در خدمتم.

Running service at startup by locked notification   
#Region  Service Attributes  
#StartAtBoot: true
'#StartCommandReturnValue: android.app.Service.START_STICKY ' for hidden service such as mp3 player    
#End Region  
Sub Process_Globals  
Dim sNotif As Notification   
End Sub  
Sub Service_Create     
sNotif.Initialize sNotif.Icon = "icon2"  
sNotif.SetInfo("MyApp","Service Running",actmain2)
sNotif.Sound = False 
sNotif.Notify(1)
Service.StartForeground(1,sNotif)     
End Sub

دادا اینم زدم بازم سوریس بسته میشه  

[محمدرضا شاهپیری 5,538]

از برودکست رسیور استفاده کنید عزیز. با اکشن time_tick

[پژمان نیکروان 6,055]

سلام

توی تاپیک اعلام شده بود که با کتابخانه AlarmManager قابل حله.

کتابخانه ازاینجا قابل دریافته

 

[sorena.king.24 11]

در 19 ساعت قبل، محمدرضا شاهپیری گفته است :

از برودکست رسیور استفاده کنید عزیز. با اکشن time_tick

دوست من اگه میشه لینکی،آموزشی یا سورسی به من بدین تا باهاش کار کنم

هر جایی بود گشتم پیدا نکردم

حتی یه آموزش از شما پیدا کردم ولی برای اندرویداستادیوم بود نه بسیک

[محمدرضا شاهپیری 5,538]

فکر کنم دکمه سرچ به تنها کسی که جواب درست میده خودمم. یادم باشه بگم بچه ها درستش کنن

 

[mirtalebi 30]

در 11 ساعت قبل، sorena.king.24 گفته است :

دادا اینم زدم بازم سوریس بسته میشه  

چه کدی توی سرویس نوشتی ؟؟؟

توی چه دوایسی اجرا می کنی ؟؟؟

این کد کاری می کنه که اندروید اصلا سرویس رو نمی بنده حتی اگر فشار زیاد باشه سرعت اون رو کم میکنه !!!

کدی که توی سرویس می نویسید رو بزارین شاید مشکل از اونجا باشه !!!

در پناه برنامه نویس هستی باشید

در ضمن روز پدر برای شما مبارک

[sorena.king.24 11]

در در 1396/01/19, 17:07:04، mirtalebi گفته است :

چه کدی توی سرویس نوشتی ؟؟؟ پایین میزارم،این بار با تیک تایم نوشتم

توی چه دوایسی اجرا می کنی ؟؟؟ نوت4

این کد کاری می کنه که اندروید اصلا سرویس رو نمی بنده حتی اگر فشار زیاد باشه سرعت اون رو کم میکنه !!! نمیدونم  

کدی که توی سرویس می نویسید رو بزارین شاید مشکل از اونجا باشه !!! حتما

در پناه برنامه نویس هستی باشید

در ضمن روز پدر برای شما مبارک _مرسی،عید شما هم مبارک  

اینم کدش این دفه با تایم نوشتم

یکی دیگه هم نوشتم که با 

PNBroadcastReceiver

تو ارسال قبلیم میتونید ببنید

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

رو حالت خواب که میره اصلا کار نمیکنه  

کلا سرویس رو حال خواب نابود میشه :| 

#Region  Service Attributes 
	#StartAtBoot: false
	#StartCommandReturnValue: android.app.Service.START_STICKY
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Dim activiti_now As Boolean
	Dim set_time As Int
	Dim ASP As AriaSharedPreferences
	Dim bar_volom As Int
'	Dim Noti As NotificationBuilder
	Dim set_time_min As Int 
	Dim set_time_hos As Int = 0
	Dim pn As PNBroadcastReceiver
	Dim sNotif As Notification
	Dim tim As Timer
End Sub

Sub Service_Create
	'	Service.StartForeground(0,Null)
	pn.Initialize("pn")
	pn.AddAction("android.intent.action.TIME_TICK")
	pn.RegisterReceiver
	notifi2
	Log("اکتیوتی ساخت اولیه")
	tim.Initialize("tiime",1000*60)
	tim.Enabled = True
End Sub

Sub tiime_Tick
	Log("اکتیوی تییک تایم")
	algoritm
End Sub

Sub Service_Start (StartingIntent As Intent)
	Log("اکتیوتی ساخت استاارت")

End Sub

Sub show_min_hos
	Dim set_min As Int = set_time
	Dim set_hos As Int = 0
	
	Log( "min = " & set_time_min & "//hos = " & set_time_hos)
	Do While set_min >= 60
		set_min = set_min - 60
		set_hos = set_hos + 1
	Loop
	set_time_min = set_min
	set_time_hos = set_hos
End Sub

Sub pn_OnReceive(Action As String,keys() As String,Data As Object)
	Log("داره تیک میخوره")
	Log("Action" & Action)
	Log("keys" & keys.Length)
	Log("Data" & Data)
End Sub

'نمایش تایم در نوتفیکشن
'Sub show_notf
'	show_min_hos
'	Noti.ContentText = set_time_min &" : "& set_time_hos &CRLF& "دیگه منو بیدار کن"
'	Noti.Notify(1)
'	'	Service.StartForeground(1,Noti)
'End Sub
'
'	'ساخت نوت فیکشن
'Sub notifi
'	''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'	Noti.Initialize
'	Noti.SmallIcon = "icon"
'	Noti.Ticker = "new demo"
'	Noti.Tag = "some tag"
'	Noti.setActivity("act_Main")
'	Noti.DefaultLight = False
'	Noti.DefaultVibrate = False
'	Noti.DefaultSound = False
'	Noti.ContentTitle = "(تایم معکوس)"
'	'		Noti.SubText = "متن اصلی"
'	Noti.OnGoingEvent = True
'	show_notf
'	''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'End Sub

Sub notifi2

sNotif.Initialize
sNotif.Icon = "icon"  
sNotif.Sound = False 
sNotif.Vibrate = False
sNotif.Light = False
sNotif.Insistent = True
	show_notf2
	
End Sub

Sub show_notf2
	show_min_hos
	sNotif.SetInfo("MyApp",set_time_min &" : "& set_time_hos &CRLF& "دیگه منو بیدار کن",act_Main)
'	sNotif.ContentText = set_time_min &" : "& set_time_hos &CRLF& "دیگه منو بیدار کن"
	sNotif.Notify(1)
	Service.StartForeground(1,sNotif)
End Sub


Sub algoritm
	
	ASP.Initialize("")
	Log("start")
	Log(set_time)
	'	Log(activiti_now)
	If ASP.GetInt("set_time",1) <> 1  And ASP.getBoolean("Active_now",True) = False Then
'		StartServiceAt(Me, DateTime.Now + 1000 * 60 , True)
		show_notf2
		set_time = ASP.GetInt("set_time",0)
		set_time = set_time  - 1
		ASP.SaveInt("set_time",set_time)
	Else 'If activiti_now == True Then
		'خواندن متن موسیقی
		act_choss_ring.choss_ring_set = ASP.GetString("get_music","1.mp3")
		Log("time go")
		StartActivity(act_ring)
		activiti_now = False
		StopService("str_strat")
	End If

End Sub

Sub Service_Destroy
	Log("stoooooop")
End Sub

 

[sorena.king.24 11]

در 23 ساعت قبل، محمدرضا شاهپیری گفته است :

فکر کنم دکمه سرچ به تنها کسی که جواب درست میده خودمم. یادم باشه بگم بچه ها درستش کنن

 

زدم ولی بازم برام درست کار نمیکنه

نکنه به خاطره اینه که اندرویدم 6

یا بهش دسترسی چیزی ندادم که درست کار نمیکنه

کدی که نوشتم همین

#Region  Service Attributes 
	#StartAtBoot: false
	#StartCommandReturnValue: android.app.Service.START_STICKY
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Dim activiti_now As Boolean
	Dim set_time As Int
	Dim ASP As AriaSharedPreferences
	Dim bar_volom As Int
	Dim Noti As NotificationBuilder
	Dim set_time_min As Int 
	Dim set_time_hos As Int = 0
	Dim pn As PNBroadcastReceiver
End Sub

Sub Service_Create
	'	Service.StartForeground(0,Null)
	pn.Initialize("pn")
	pn.AddAction("android.intent.action.TIME_TICK")
	pn.RegisterReceiver
	notifi
End Sub

Sub Service_Start (StartingIntent As Intent)
	
End Sub

Sub show_min_hos
	Dim set_min As Int = set_time/60
	Dim set_hos As Int = 0
	
	Log( "min = " & set_time_min & "//hos = " & set_time_hos)
	Do While set_min >= 60
		set_min = set_min - 60
		set_hos = set_hos + 1
	Loop
	set_time_min = set_min
	set_time_hos = set_hos
End Sub

Sub pn_OnReceive(Action As String,keys() As String,Data As Object)
	Log("داره تیک میخوره")
	algoritm
End Sub

'نمایش تایم در نوتفیکشن
Sub show_notf
	show_min_hos
	Noti.ContentText = set_time_min &" : "& set_time_hos &CRLF& "دیگه منو بیدار کن"
	Noti.Notify(0)
End Sub

	'ساخت نوت فیکشن
Sub notifi
	''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
	Noti.Initialize
	Noti.SmallIcon = "icon"
	Noti.Ticker = "new demo"
	Noti.Tag = "some tag"
	Noti.setActivity("act_Main")
	Noti.DefaultLight = False
	Noti.DefaultVibrate = False
	Noti.DefaultSound = False
	Noti.ContentTitle = "(تایم معکوس)"
	'		Noti.SubText = "متن اصلی"
	Noti.OnGoingEvent = True
	show_notf
	''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Sub

Sub algoritm
	
	ASP.Initialize("")
	Log("start")
	Log(set_time)
	'	Log(activiti_now)
	If ASP.GetInt("set_time",0) <> 0  And ASP.getBoolean("Active_now",True) = False Then
'		StartServiceAt(Me, DateTime.Now + 1000 * 60 , True)
		show_notf
		set_time = ASP.GetInt("set_time",0)
		set_time = set_time  - 60
		ASP.SaveInt("set_time",set_time)
	Else 'If activiti_now == True Then
		'خواندن متن موسیقی
		act_choss_ring.choss_ring_set = ASP.GetString("get_music","1.mp3")
		Log("time go")
		StartActivity(act_ring)
		activiti_now = False
		StopService("str_strat")
	End If

End Sub

Sub Service_Destroy
	Log("stoooooop")
End Sub

 

[محمدرضا شاهپیری 5,538]

منظورتون از حالت خواب چیه عزیز؟ حالت خواب من نشنیدم تو اندروید

اگه منظورتون خاموش روشن شدنه که بایه کد زیر رو تغییر بدین

#StartAtBoot: true

[محمد رشوند 1,208]

در ۱ ساعت قبل، sorena.king.24 گفته است :

زدم ولی بازم برام درست کار نمیکنه

نکنه به خاطره اینه که اندرویدم 6

یا بهش دسترسی چیزی ندادم که درست کار نمیکنه

کدی که نوشتم همین

فکر کنم اقای نیکروان فایلی متنی به عنوان Actions قرار داده باشن داخل فایل های کتابخونه بنظر منباید از اکشنی با عنوان sleepscreen استفاده کنید

شرط بزارین که هر موقع sleep شد اکشن time_tick فعال بشه

با اون کتابخونه تمام رویداد های دستگاه رو میتونید شرط گذاری کنید توضیحات کامل رو دربارش بخونید

[mohammad3250 206]

میتونی از permission استفاده کتی برنامت خواب نره 

[sorena.king.24 11]

در 17 ساعت قبل، محمدرضا شاهپیری گفته است :

منظورتون از حالت خواب چیه عزیز؟ حالت خواب من نشنیدم تو اندروید

اگه منظورتون خاموش روشن شدنه که بایه کد زیر رو تغییر بدین

#StartAtBoot: true

شما حالت خواب را از کجادیدین

من چیزی درموردش نگفتم

ولی دقیقا منظورم همین هست که شما گفتیم

وقتی صفحه گوشی خاموش میشه منظورم خاموش ملطق نیستاا

همون ستندبای یا sleep

دیگه کد از کار میافتد و دیگه تو حالت sleep محاسباتو انجام نمیده داخل سرویس

[sorena.king.24 11]

در 15 ساعت قبل، mohammad3250 گفته است :

میتونی از permission استفاده کتی برنامت خواب نره 

دوست من میشه لطفا یه آموزشی ،سورسی بهم بدین

ممنون میشم  

[sorena.king.24 11]

در 17 ساعت قبل، محمد رشوند گفته است :

فکر کنم اقای نیکروان فایلی متنی به عنوان Actions قرار داده باشن داخل فایل های کتابخونه بنظر منباید از اکشنی با عنوان sleepscreen استفاده کنید

شرط بزارین که هر موقع sleep شد اکشن time_tick فعال بشه

با اون کتابخونه تمام رویداد های دستگاه رو میتونید شرط گذاری کنید توضیحات کامل رو دربارش بخونید

مگه خوده اکشن time_tick تو حالت خواب انجام نمیشه

دوست من میشه یه سورسی چیزی بدین تا منظورتونا بهتر متوجه شم

ممنون میشم  

[mirtalebi 30]

سلام دوست عزیز 

اگر کد زیر رو بنویسی برنامه یه نوتیفیکیشن میده و اندروید اونو نمیبنده چون کاربر از اجرای اون خبر داره من از این کد استفاده کردم درست شد حتی توی اندروید 6!!!

اگر خوشت اومد پسندیدم رو بزن!!!

مشکلی بود در خدمتم.

Running service at startup by locked notification   
#Region  Service Attributes  
#StartAtBoot: true
'#StartCommandReturnValue: android.app.Service.START_STICKY ' for hidden service such as mp3 player    
#End Region  
Sub Process_Globals  
Dim sNotif As Notification   
End Sub  
Sub Service_Create     
sNotif.Initialize sNotif.Icon = "icon2"  
sNotif.SetInfo("MyApp","Service Running",actmain2)
sNotif.Sound = False 
sNotif.Notify(1)
Service.StartForeground(1,sNotif)     
End Sub

[پژمان نیکروان 6,055]

سلام

دوستان شاید بتونیم بگیم روشی استاندارد تر از آموزشی که قبلا گذاشته بودم توسط برادکست رسیور و سرویس وجود داره.

خود اندروید کلاسی داره به نام AlarmManager که دارم روش کار میکنم تا بتونیم کتابخانشو در بیسیک داشته باشیم. این دیگه نیازی به سرویس نداره. یعنی درواقع خودش یک BroadCastReceiver هست و درهرحالت اعلان رو میده.