s2m 10 ارسال شده در 26 فروردین، ۱۳۹۵ اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ سلام به همه دوستان من دیشب یه برنامه در مایکت قرار دادم که خرید درون برنامه داره الان مدیر مایکت میگه: "پرداخت درون برنامه ای مایکت را درج نمایید." و برنامم رو رد کرده، کسی هست بدونه چه باید بکنم؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
Negan 1,300 ارسال شده در 26 فروردین، ۱۳۹۵ اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ قسمت کد پرداخت درون برنامه رو بزارید البته کلد عمومی رو از توش وردارین اول تا بتونیم کمکتون کنیم لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
s2m 10 ارسال شده در 26 فروردین، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ ممنون خدمت شما Sub Process_Globals Private key As String = "key" Private oBillingManager As BillingManager3 End Sub Sub Activity_Create(FirstTime As Boolean) oBillingManager.Initialize("BillingManager", key) End Sub Sub btnBuyStar_Click oBillingManager.RequestPayment(SKU_Star, "inapp", "Developer Payload") End Sub Sub BillingManager_BillingSupported (Supported As Boolean, Message As String) Log("BillingSupported: " & Supported & ", " & Message) Log("Subscriptions supported: " & oBillingManager.SubscriptionsSupported) If Supported = True Then blnIsoBillingManagerAvailable = True End If If blnIsoBillingManagerAvailable = True Then oBillingManager.GetOwnedProducts End If End Sub Sub BillingManager_PurchaseCompleted(Success As Boolean, Product As Purchase) Log("Is Purchase State: " & Success) If Success Then ToastMessageShow("خرید موفق",False) oBillingManager.ConsumeProduct(Product) Else Log("PurchaseCompleted: Unsuccess") ToastMessageShow("خرید نا موفق",False) End If End Sub Sub BillingManager_ProductConsumed (Success As Boolean, Product As Purchase) Log("Product ( " & Product.ProductId & " ) Consume : " & Success ) If Success = True Then If Product.ProductId = SKU_Money Then AddMoney Else If Product.ProductId = SKU_Star Then AddStar End If End If End Sub Sub BillingManager_OwnedProducts(Success As Boolean, purchases As Map) Log("Product owned : " & Success) If Success Then Log(purchases.Values) For Each P As Purchase In purchases.Values Log("type : " & P.ItemType & "/" & P.DeveloperPayload) oBillingManager.ConsumeProduct(P) Log(P.ProductId & ", Purchased? " & (P.PurchaseState = P.STATE_PURCHASED)) Next End If End Sub #End Region لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
Negan 1,300 ارسال شده در 26 فروردین، ۱۳۹۵ اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ والا الان ک نگاه میکنم مشکلی توی کد نیست مطمئنید کلید عمومی و شناسه محصول رو درست وارد میکنی ؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
s2m 10 ارسال شده در 26 فروردین، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ والا الان ک نگاه میکنم مشکلی توی کد نیست مطمئنید کلید عمومی و شناسه محصول رو درست وارد میکنی ؟ آره الان دوباره چک کردم نمیفهمم منظورش از "پرداخت درون برنامه ای مایکت را درج نمایید." چیه!!!؟؟؟؟ برنامه رو تست کردم و کاملا کار میکنه؟ خرید هم انجام میشه، نمیدونم براچی رد کرده برنامه رو؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
porya 959 ارسال شده در 26 فروردین، ۱۳۹۵ اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ سلام شما دسترسی زیر رو وارد کردید... AddPermission(ir.mservices.market.BILLING) لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
s2m 10 ارسال شده در 26 فروردین، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 26 فروردین، ۱۳۹۵ سلام آره در فایل مانیفست وارد کردم برا همین نمیفهمم منظور از این خطا چیه؟!!؟ :wacko1: لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
s2m 10 ارسال شده در 29 فروردین، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 29 فروردین، ۱۳۹۵ با سلام خدمت دوستان اومدم بگم که مشکل این بود که در نرم افزارم از پرداخت درون برنامه ای ایران اپس هم همزمان استفاده کرده بودم و مایکت اجازه این کار رو نمیده با حذفش مشکل رفع شد. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.