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

جلوگیری از هک درون پرداخت بدون کتابخانه


fito

سوال

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

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

permissions: Get_Tasks

Sub e33bazarcheck As Boolean
	Dim ActMan As JavaObject
	Dim R As Reflector
	R.Target=R.GetContext
	ActMan = R.RunMethod2("getSystemService","activity","java.lang.String")
	Dim TaskInfo As JavaObject = ActMan.RunMethod("getRunningTasks",Array As Object(1))
	Dim CompInfo As JavaObject = TaskInfo.RunMethodJO("get",Array As Object(0)).GetField("topActivity")
	Dim PackageName As String = CompInfo.RunMethod("getPackageName",Null)
	If PackageName.CompareTo("com.farsitel.bazaar")=0 Then Return True
		Return False
End Sub

Sub buy_PurchaseCompleted (Success As Boolean, Product As Purchase)
	If e33bazarcheck Then		
		If Success Then
				ToastMessageShow("خرید شد",True)
		End If	
	Else
		Msgbox("Warning","خطا در خرید!")
	End If
End Sub

 

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

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

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

برای امنیت درون پرداخت فقط از api بازار یا مایکت که آموزشش توی انجمن موجوده استفاده کنید

تنها روش قابل اطمینان فعلا همین استفاده از api هستش

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

در 1 ساعت قبل، RoyaPM گفته است :

برای امنیت درون پرداخت فقط از api بازار یا مایکت که آموزشش توی انجمن موجوده استفاده کنید

تنها روش قابل اطمینان فعلا همین استفاده از api هستش

اونو که میدونم، اما سوالم راجب این قطعه کد بود که قبلنا با کتابخانه مشکل پیش میومد برای بعضی، اما حالا کده فقط!

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

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

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