رفتن به مطلب
  • 0

عدم گرفتن دسترسی ها


mostafaHD

سوال

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

کدهای منیفست رو هم اضافه کردم

روی اندروید 9 و 10 تست کردم

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	
	Activity.LoadLayout("main")
	
	If Not(rr.Check(rr.PERMISSION_READ_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_RECEIVE_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_RECEIVE_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CONTACTS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CONTACTS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CALL_LOG)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CALL_LOG)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If

	
End Sub

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

2 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

در در 16 بهمن 1399 در 23:07، mostafaHD گفته است :

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

کدهای منیفست رو هم اضافه کردم

روی اندروید 9 و 10 تست کردم


Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	
	Activity.LoadLayout("main")
	
	If Not(rr.Check(rr.PERMISSION_READ_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_RECEIVE_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_RECEIVE_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CONTACTS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CONTACTS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CALL_LOG)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CALL_LOG)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If

	
End Sub

 

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

مانیفیست اندروید هم بزار ۲۱

لینک ارسال
به اشتراک گذاری در سایت های دیگر

در در 16 بهمن 1399 در 23:07، mostafaHD گفته است :

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

کدهای منیفست رو هم اضافه کردم

روی اندروید 9 و 10 تست کردم


Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	
	Activity.LoadLayout("main")
	
	If Not(rr.Check(rr.PERMISSION_READ_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_RECEIVE_SMS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_RECEIVE_SMS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CONTACTS)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CONTACTS)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If
	
	If Not(rr.Check(rr.PERMISSION_READ_CALL_LOG)) Then
		Wait For Msgbox_Result (Result As Int)
		rr.CheckAndRequest(rr.PERMISSION_READ_CALL_LOG)
		Wait For activity_PermissionResult (Permission As String, havePermission As Boolean)
		If havePermission = False Then
			Return
		End If
	End If

	
End Sub

 

فک نکنم روش درستی برای گرفتن چندین دسترسی باشه شما متد CheckAndRequest  رو که صدا بزنید ، خودش چک میکنه اگر دسترسی داده نشده بود از کاربر درخواست میکنه اگر داده بود کاری انجام نمیده

rr.CheckAndRequest(rr.PERMISSION_READ_SMS)
rr.CheckAndRequest(rr.PERMISSION_RECEIVE_SMS)
rr.CheckAndRequest(rr.PERMISSION_READ_CONTACTS)
rr.CheckAndRequest(rr.PERMISSION_READ_CALL_LOG)

sub Activity_PermissionResult (Permission As String, Result As Boolean)
	log(Permission)
	log(Result)
    If Result = false Then
        Log("No Permission")
    End If
End If

 

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...