آموزش حذف تبلیغات عدد با پرداخت درون برنامه ای

[iraj_astara 97]

 

سلام

یه آموزش خیلی ساده رو براتون میذارم که کاربر وقتی از برنامتون حمایت میکنه و مبلغی رو واریز میکنه ، دیگه تبلیغات عدد رو نشون نده

 

کد زیر رو تو SUBیی قرار میدیم که پرداخت انجام شده. با استفاده از کتابخونمون

 

در واقع اینجا میاد یه فایل ads.txt میسازه

 

If Successed Then

File.WriteString(File.DirInternal,"ads.txt","")

و...

If File.Exists(File.DirInternal,"ads.txt") = True Then


Dim disabled As String = "true"

   Dim r As Reflector 

Dim args(1) As Object = Array As Object(disabled)

   Dim types(1) As String = Array As String("java.lang.String")

   r.RunStaticMethod("ir.adad.AdadB4APlugin", "setDisabled", args, types)


End If

واین کد رو تو صفحه اول برناممون میزاریم  ، که چک میکنه ببینه اگر فایل ads.txt وجود داره ، کد های لغو تبلیغات رو اعمال بکنه

 

با سپاس.

[afraz11 246]

حالا بنده یه سوال داشتم اگه این کدو تو اکتویتی اول بنویسیم آیا فقط تبلیغاتی که تو اون اکتویتی است رو غیره فعال میکنه یا نه همه تبلیغاتو (تبلیغاتی رو که تو اکتیویتی دیگه هم هستند رو غیرفعال میکنه)

 

لطفا پاسخ دهید

[iraj_astara 97]

حالا بنده یه سوال داشتم اگه این کدو تو اکتویتی اول بنویسیم آیا فقط تبلیغاتی که تو اون اکتویتی است رو غیره فعال میکنه یا نه همه تبلیغاتو (تبلیغاتی رو که تو اکتیویتی دیگه هم هستند رو غیرفعال میکنه)

 

لطفا پاسخ دهید

 

همه ی تبلیغات رو غیر فعال میکنه

 

تو اکتیویتی اول میزاریم که همونجا شرط  رو چک کنه

[aloneboy7617 155]

 

 

سلام

یه آموزش خیلی ساده رو براتون میذارم که کاربر وقتی از برنامتون حمایت میکنه و مبلغی رو واریز میکنه ، دیگه تبلیغات عدد رو نشون نده

 

کد زیر رو تو SUBیی قرار میدیم که پرداخت انجام شده. با استفاده از کتابخونمون

 

در واقع اینجا میاد یه فایل ads.txt میسازه

 

If Successed Then
File.WriteString(File.DirInternal,"ads.txt","")
و...

If File.Exists(File.DirInternal,"ads.txt") = True Then

Dim disabled As String = "true"
   Dim r As Reflector 
Dim args(1) As Object = Array As Object(disabled)
   Dim types(1) As String = Array As String("java.lang.String")
   r.RunStaticMethod("ir.adad.AdadB4APlugin", "setDisabled", args, types)

End If

واین کد رو تو صفحه اول برناممون میزاریم  ، که چک میکنه ببینه اگر فایل ads.txt وجود داره ، کد های لغو تبلیغات رو اعمال بکنه

 

با سپاس.

 

اون و... یعنی چی؟ چیزی باید خودمون اونجا بنویسیم؟

[aloneboy7617 155]

داداش من نفهمیدم

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

یه دکمه دارم تو اکتیویتی آخر که میخوام با اون حمایت و حذف تبلیغات بشه هیچ بخشی از برنامه باز نمیشه

حالا چطور میشه چی بنویسم واسه اون دکمه؟

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

[iraj_astara 97]

ساده تر از این کد تو برنامه نویسی نیست ، 5 خطش که برای خود تبلیغات عدد ، من فقط 4 تا خط کد بهش دادم ، یعنی اینقدر سخته؟؟ منطق کد رو هم که گفتم 

بهتر به جای کپی برداری ، صورت مساله رو درک کنیم

 

و یعنی اینکه یه else if میاد میگی که خطا رخ داد همین

 

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