اشتراک گذاری در یک نرم افزار

[Alireza.Ghafari 2,104]

سلام دوستان یه کد ساده میخواستم !

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

خیلی متشکر

[پژمان نیکروان 6,055]

سلام

Dim u AsUri
u.Parse("file://" & File.Combine(file.DirRootExternal, "ahang.mp3"))
Dim inten AsIntent
Dim tmpt AsString = "matn"
inten.Initialize(inten.ACTION_SEND,"")
inten.SetType("Audio/mp3")
inten.PutExtra("android.intent.extra.STREAM",u)
inten.PutExtra("android.intent.extra.TEXT",tmpt)
inten.SetComponent("ESMEPACKAGE/.activity.ShareHandlerActivity")
StartActivity(inten)

فقط این واسه اشتراک اهنگ هست که اگه میخوای عوض کنی میتونی جای Audio/mp3 مثلا واسه عکس بذاری: Image/*

و جای اسم پکیج ، پکیج مورد نظرتو بذار.