کتابخانه SayaInstallerPackageName برای چک کردن نصب و خرید برنامه از مارکت

[MahdiHD 1,748]

سلام و وقت بخیر خدمت دوستان

 

در تاپیک زیر آقای محمدی پیشنهادی دادند تا بتونیم پکیج نیمی که برنامه توسط اون نصب شده (یا گرفتن منبع نصب اپلیکیشن) بگیریم ، که خب با توجه به این که کلاس پکیج منیجر پیشفرض بیسیک این متد رو نداشت یک کتابخونه کوچیک نوشتم تا این کار رو انجام بدید :

http://answercenter.ir/topic/14808-%D9%BE%DB%8C%D8%AF%D8%A7-%DA%A9%D8%B1%D8%AF%D9%86-%D9%85%D9%86%D8%A8%D8%B9-%D9%86%D8%B5%D8%A8-%D8%A7%D9%BE%D9%84%DB%8C%DA%A9%DB%8C%D8%B4%D9%86%D8%9F%D8%9F/

 

با استفاده از متد isStoreVersion ، پکیج نیم مارکت رو بهش بدید ، اگر به واسطه مارکت نصب شده بود مقدار True و در غیر این صورت مقدار False رو بر می گردونه.

 

برای تست هم برنامه رو روی گوشی خودتون نصب کنید ، باید توستی نمایش داده بشه مبنی بر "شما برنامه را از بازار دانلود نکرده اید".

 

مطمئنا با این روش جلوی بسیاری از سو استفاده ها و پخش رایگان برنامه رو می گیرید.

 

دانلود کتابخانه به همراه سورس | رمز : answercenter.ir

 

SayaInstallerPackageName.rar

[ha88an 203]

چه جالب. ینی واقعا به همین سادگی بوده کسی به ذهنش نرسیده بوده تا الان؟

ممنون از کتابخونه خوبتون و اطلاعاتتون

[mehrabmmp 528]

عالیییی

ممنون 

با این میشه جلوی خیلی از برنامه های پولی که تو تلگرام رایگان میزارن رو گرفت

[ali.1020 98]

لطفا تو پیکوفایل اپ کنید من هر کاری میکنم دانلود نمیشه 

[امین شاهدی 5,769]

متد خیلی خوب وکاربردیه باریکلا مهدی جان

[Kazem Forghani 2,927]

لطفا تو پیکوفایل اپ کنید من هر کاری میکنم دانلود نمیشه 

مشکلی نداره! لینک کار می کنه.

http://s6.picofile.com/file/8259426126/SayaInstallerPackageName.rar.html

[mehrabmmp 528]

لطفا تو پیکوفایل اپ کنید من هر کاری میکنم دانلود نمیشه 

با هیتلر شکن بیای دان نمیشه

یه نگاه به دانلود منیجرت هم بنداز

[m007moh 181]

ممنون از کتابخونتون 

 

فقط میخواستم بدونم الان برای تست چجوری تست کنم ؟؟؟

میخوام یه تست بذارم که با نرم افزاری با پکیج نیم m2.inestaller.app نصب بشه

 

حالا تو این نرم افزار ح چجوری برنامه اصلی رو نصب کنم؟؟؟

 

نمیدونم تونستم منظورم رو برسونم یا نه؟؟

[Kazem Forghani 2,927]

ممنون از کتابخونتون 

 

فقط میخواستم بدونم الان برای تست چجوری تست کنم ؟؟؟

میخوام یه تست بذارم که با نرم افزاری با پکیج نیم m2.inestaller.app نصب بشه

 

حالا تو این نرم افزار ح چجوری برنامه اصلی رو نصب کنم؟؟؟

 

نمیدونم تونستم منظورم رو برسونم یا نه؟؟

ببینید این کتابخانه منبع نصب برنامه رو میگیره! مثلا اگر شما برنامه رو توی فایل منیجر بریزید بعد نصب کنید منبع نصب null برگردونده می شه و اگر از کافه بازار برنامه رو دانلود و نصب کنید پکیج نیم کافه بازار برگردونده می شه.

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

ولی من منظور شما رو متوجه نشدم؛ لطفاٌ واضح و مفصل توضیح بدید.

موفق باشید

[ali.1020 98]

من مثالو تست میکنم هم تو گوشی هم تو شبیه ساز پیغام دومی که مبنی بر اینکه از بازار دانلود نکردی را نشون میده 

اینم بگم هم تو گوشی (htc 1) و هم تو جنی موشن بازار نصبه 

[m007moh 181]

ببینید این کتابخانه منبع نصب برنامه رو میگیره! مثلا اگر شما برنامه رو توی فایل منیجر بریزید بعد نصب کنید منبع نصب null برگردونده می شه و اگر از کافه بازار برنامه رو دانلود و نصب کنید پکیج نیم کافه بازار برگردونده می شه.

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

ولی من منظور شما رو متوجه نشدم؛ لطفاٌ واضح و مفصل توضیح بدید.

موفق باشید

 

دقیقا منظورم همین بود من الان کد زیر رو نوشتم واسه ی نصب

Sub btn_Click
	Dim std As StudentApp
	std.Initialize
	std.InstallAPK(File.DirRootExternal,"1.apk")
End Sub

که پکیج نیم این نرم افزار m2.inestaller.app هست و راحت نصب میکنه

از اونطرف تو خود نرم افزارمم این کد رو نوشتم 

If (s.isStoreVersion("m2.inestaller.app") = True) Then
		GoToApp
	Else
		ToastMessageShow("شما نرم افزار را از بازار دانلود نکرده اید,True)
	End If

ولی بازم توست میده

[mehrabmmp 528]

من مثالو تست میکنم هم تو گوشی هم تو شبیه ساز پیغام دومی که مبنی بر اینکه از بازار دانلود نکردی را نشون میده 

اینم بگم هم تو گوشی (htc 1) و هم تو جنی موشن بازار نصبه 

 

خب باید برنامه رو از بازار تصب کنی دیگه

شما الان این سورسی که اقا مهدی دادن رو شما رو هر شبیه ساز و گوشی تست کنی میگه که از بازار نصب نشده

[ali.1020 98]

خب باید برنامه رو از بازار تصب کنی دیگه

شما الان این سورسی که اقا مهدی دادن رو شما رو هر شبیه ساز و گوشی تست کنی میگه که از بازار نصب نشده

تو جفتش نصبه 

الان رو یه گوشی دیگه تست کردم  اونم پیغام دومیه که از بازار نصب نکردید رو میده در حالی که بازار هم نصبه 

نمیدونم مشکل از منه یا کتابخانه 

[mehrabmmp 528]

تو جفتش نصبه 

الان رو یه گوشی دیگه تست کردم  اونم پیغام دومیه که از بازار نصب نکردید رو میده در حالی که بازار هم نصبه 

نمیدونم مشکل از منه یا کتابخانه 

شما انگار متوجه نشدید

ببینید شما اگه این برنامه رو از بازار دانلود کنید و نصب کنید پیام میده که از بازار نصب شده اما اگه از یه جای دیگه دانلود کنی یا بهت بفرستن نصب کنی پیام میده که از بازار نصب نشده

خب شما الان این برنامه رو از اینجا دانلود کردید 

[ali.1020 98]

شما انگار متوجه نشدید

ببینید شما اگه این برنامه رو از بازار دانلود کنید و نصب کنید پیام میده که از بازار نصب شده اما اگه از یه جای دیگه دانلود کنی یا بهت بفرستن نصب کنی پیام میده که از بازار نصب نشده

خب شما الان این برنامه رو از اینجا دانلود کردید 

اوکیه 

گرفتم چی شد 

شرمنده بکم دیر متوجه مطلب شدم 

[m007moh 181]

دقیقا منظورم همین بود من الان کد زیر رو نوشتم واسه ی نصب

Sub btn_Click
	Dim std As StudentApp
	std.Initialize
	std.InstallAPK(File.DirRootExternal,"1.apk")
End Sub

که پکیج نیم این نرم افزار m2.inestaller.app هست و راحت نصب میکنه

از اونطرف تو خود نرم افزارمم این کد رو نوشتم 

If (s.isStoreVersion("m2.inestaller.app") = True) Then
		GoToApp
	Else
		ToastMessageShow("شما نرم افزار را از بازار دانلود نکرده اید,True)
	End If

ولی بازم توست میده

 

آقا یکی جواب مارو بده 

 

آلان مشکل کار من کجاس؟؟؟؟

[Kazem Forghani 2,927]

آقا یکی جواب مارو بده 

 

آلان مشکل کار من کجاس؟؟؟؟

سلام

این کد رو امتحان کنید:

If s.isStoreVersion("com.farsitel.bazaar") = True Then
	ToastMessageShow("نرم افزار از بازار دانلود شده است!",True)
Else
	ToastMessageShow("نرم افزار از بازار دانلود نشده است!",True)
End If

الان برای شما چه پیامی نشون داده می شه؟!

[m007moh 181]

سلام

این کد رو امتحان کنید:

If s.isStoreVersion("com.farsitel.bazaar") = True Then
	ToastMessageShow("نرم افزار از بازار دانلود شده است!",True)
Else
	ToastMessageShow("نرم افزار از بازار دانلود نشده است!",True)
End If

الان برای شما چه پیامی نشون داده می شه؟!

 

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

 

واسه تست خودم یه برنامه نوشتم ک از تو اون نرم افزار اصلی رو چک میکنم

[MahdiHD 1,748]

من نمی دونم دقیقا شما چی کار کردید ، اما دو برنامه مجزا ایجاد کنید ، پکیج نیم برنامه اول رو com.test.installer قرار بدید و از اون درخواست نصب برنامه دوم رو بدید.

در برنامه دوم هم چک کنید که آیا منبع نصب com.test.installer هست یا نه ، اگر False برگردونده شد ، سورستون رو قرار بدید تا بررسی کنم.

[m007moh 181]

من نمی دونم دقیقا شما چی کار کردید ، اما دو برنامه مجزا ایجاد کنید ، پکیج نیم برنامه اول رو com.test.installer قرار بدید و از اون درخواست نصب برنامه دوم رو بدید.

در برنامه دوم هم چک کنید که آیا منبع نصب com.test.installer هست یا نه ، اگر False برگردونده شد ، سورستون رو قرار بدید تا بررسی کنم.

 

من دقیقا همین کار رو کردم ولی جواب نداد

 

ممنون میشم شما یه نمونه بذارید!!!!