اشتراک گذاری متن

[porya 959]

سلام چطور میشه متن های رو که در دیتایسه با زدن یک باتن توسط برنامه های اشتراک خود گوشی مثل لاین،وایبر،sms به اشتراک گذاشت...

[نورنما 613]

در 3 ساعت قبل، mr.saymon گفته است :

سلام باید در حلقه فور اینو نوشت ؟

سلام

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

[mr.saymon 0]

سلام باید در حلقه فور اینو نوشت ؟

[Alireza.Ghafari 2,104]

لطفا قبل از تاپیک زدن سرچ کنید ...

 Dim share As Intent
   share.Initialize(share.ACTION_SEND,"")
   share.SetType("text/plain")
   share.PutExtra("android.intent.extra.TEXT", "matn Shoma")
   share.WrapAsIntentChooser("اشتراک متن من")
   StartActivity(share)  

[porya 959]

لطفا قبل از تاپیک زدن سرچ کنید ...

 Dim share As Intent
   share.Initialize(share.ACTION_SEND,"")
   share.SetType("text/plain")
   share.PutExtra("android.intent.extra.TEXT", "matn Shoma")
   share.WrapAsIntentChooser("اشتراک متن من")
   StartActivity(share)  

حالا من اینو چجوری با دیتابیس بذارم که متن های اونو به اشتراک بذاره

[farzad 41]

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

Dim i As Intent
Dim a As String

  a = cursor1.GetString("Matn")
  i.Initialize(i.ACTION_SEND, "")
   i.SetType("text/plain")
   i.PutExtra("android.intent.extra.TEXT",a)

  i.WrapAsIntentChooser("ارسال از طریق...")
   StartActivity(i)

[porya 959]

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

    
Dim share As Intent  
 share.Initialize(share.ACTION_SEND,"")
   share.SetType("text/plain")
   share.PutExtra("android.intent.extra.TEXT",Cursor1.GetString("matn"))
   share.WrapAsIntentChooser("به اشتراک بگذارید")

   StartActivity(share)