رفتن به مطلب

رضا قاسمی پور

کاربر عادی
  • تعداد ارسال ها

    6
  • تاریخ عضویت

  • آخرین بازدید

تمامی مطالب نوشته شده توسط رضا قاسمی پور

  1. حله تست میکنم دمت گرم
  2. Sub Globals Dim api As String="MIHNMA0GCSqGSIb3DQEBAQUAA4G7ADCBtwKBrwDmUXgWmUubuT/vIxLsj+Ih4HLx/+Or+Fyem4MD8YmyVSx7g8mpOr6TtcFMkw/2sgS1GPWPSloPSK3ph41NyXdCpV7kVO1PX7vAifGEU0kAYETF0AZs2ls83gHIdyUEMEAZTn9wKj8+mLS4cg6+U4LPCjmuFO38k/edwWS0YtwGJjhQLGnTN5kZS2ZIh78lMC2NSvSCVRwzYoGiD0W7p/Vji605wg86kNn5AR0/OOUCAwEAAQ==" 'کلیدی که در قسمت پرداخت درون برنامه ای بازار، باید دریافت کنید Dim x As BillingManager3 'این کتابخانه از سری کتابخانه های inAppBazzar ' باید اضافه شوئ Dim phone As PhoneId 'از این کتابخونه برای دریافت آی دیه گوشی استفاده میشه (بهتره استفاده بشه) End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("main") 'بارگذاری لیوت اصلی x.Initialize("inapp",api) 'راه اندازی کتابخانه بازار و وارد کردن پارامتر کلید پرداخت درون برنامه ای x.DebugLogging=True 'اگر خواستید این گزینه را اضافه کنید ولی لزوم نداره End Sub Sub Activity_Resume End Sub Sub Activity_Pause (UserClosed As Boolean) End Sub Sub Button1_Click x.RequestPayment("wallpaper_creator","inapp",phone.GetDeviceId) 'با فشردن کلید پرداخت، این درخواست به بازار ارسال میشه 'پارامتر اول از سمت چپ، نام برنامه است که در قسمت پرداخت درون برنامه اضافه میشود 'پارامتر دوم، نامی است که در هنگام راه اندازی کتابخانه بازار ساخته شد 'پارامتر سوم ای دی گوشی را میگیرد و بهتره که اضافه بشه End Sub Sub inapp_PurchaseCompleted (Success As Boolean, Product As Purchase) If Success=True Then ToastMessageShow("تشکر از خرید شما",False) File.WriteString(File.DirRootExternal,"payed.txt","true") x.ConsumeProduct(Product) Else ToastMessageShow("خرید انجام نشد. دوباره تلاش کنید",False) End If End Sub ' به طور کلی این ساب بعد از خرید اجرا میشه (الان کجاش باید عوض شه؟)
  3. اولین باره کلا میخوام ی محصول اشتراکی بزارم با خرید درون پرداختی تاحالا کار نکردم ولی خب درون پرداختی اموزششو پیدا کردم الان پس همونو انجام بدم تنها جای تفاوت این کد که گفتید ؟
  4. توی خود سایت بازار راهنمایی کرده ولی مال اندروید استودیو ن بیسیک
  5. سلام دوستان کسی میدونه چطوری صفحه خرید اشتراک باید ساخت توی بازار و مایکت ؟ هر چی گشتم پیدا نکردم چیزی خرید عادی هس ولی اشتراک ن
  6. با سلام چطور میتونم یه دکمه اینطوری بسازم که وقتی از برنامه خارج شدی دکمه شناور بمونه ؟؟
×
×
  • جدید...