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

[arastooms 1,046]

سلام طبق عکس از یک دکمه استفاده کردم که کلیک میشه میره به صفحه برنامه ها در گوگل پلی 
ولی چون برنامه و مارکت های مختلفی دارم مثل بازار و ....
میاد اول میپرسه که با کدوم مارکت میخای بری به این آدرس ....
////////////
مشکل اینه که من نمیخام بپرسه و میخان دقیقا با گوکل پلی باز بشه 
///
ممنون میشم اگر راهنمایی بفرمایید 
سپاس
       

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

شرمنده ارسطو جان توی کد یادم رفت اینتنت رو برگردونم ، این کد رو استفاده کن : 

Sub Getsetpackagedintent(param As Intent) As Intent
	Dim jo As JavaObject=param
	jo.RunMethod("setPackage",Array As Object("com.android.vending"))
	Return param
End Sub

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

Dim in As Intent
in.Initialize(in.ACTION_VIEW,"market.....")
StartActivity(Getsetpackagedintent(in))

آین ساب رو هم اضافه کن : 

Sub Getsetpackagedintent(param As Intent) As Intent
	Dim jo As JavaObject=param
	jo.RunMethod("setPackage",Array As Object("com.android.vending"))
End Sub

[arastooms 1,046]

Dim in As Intent
in.Initialize(in.ACTION_VIEW,"market.....")
StartActivity(Getsetpackagedintent(in))

آین ساب رو هم اضافه کن : 

Sub Getsetpackagedintent(param As Intent) As Intent
	Dim jo As JavaObject=param
	jo.RunMethod("setPackage",Array As Object("com.android.vending"))
End Sub

سلام و درود به استاد شاهدی عزیز 

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

       

من ساب کلیک رو طبق راهنمایی  شما تغیر دادم 

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

ساب مورد نظر شما رو هم اضافه کردم ( البته آخر فرمان رو پاک کردم As Intent ) چون بر نامه خطا میداد و به نظر باید اصلاح میشد  که به صورت زیر شد

Sub Getsetpackagedintent(param As Intent)

////////////////

مشکل اینجا هست که 

با کلیک روی عکس گوگل هیچ اتفاقی نمی افته !!!!

نمیدونم چه فرمانی کم هست و چرا؟؟؟

[arastooms 1,046]

 

شرمنده ارسطو جان توی کد یادم رفت اینتنت رو برگردونم ، این کد رو استفاده کن : 

Sub Getsetpackagedintent(param As Intent) As Intent
	Dim jo As JavaObject=param
	jo.RunMethod("setPackage",Array As Object("com.android.vending"))
	Return param
End Sub

بی نظیری امین جان 

واقعا تشکر وسپاس از شما 

کد ها ی اصلاح شد و کاملا کار میکنه امین عزیز 

         

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