نمایش متن دلخواه هنگام اشتراک مطلب

[abbas2142 557]

با سلام

 

 

من هروقت که یک متن رو با برنامه اشتراک گذاری می کنم ( ارسال به واتس آپ و... ) زیر آن پیام یه متن دلخواه خودم هم ارسال بشه .

 

مثل برنامه های پیامکی موجود .

 

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

 

ممنون

[bahman 165]

ub btnshare_Click
    Dim send As Button ' اشتراک گزاری متن
    send=Sender
    cursur1.Position=send.Tag
    text=cursur1.GetString("payamak")
    Dim share As Intent
    share.Initialize(share.ACTION_SEND,"")
    share.SetType("text/plain")
    share.PutExtra("android.intent.extra.TEXT",  text  & CRLF & CRLF & "♥ Barname man ♥" )
    share.WrapAsIntentChooser("اشتراک گذاری پیامک با ...")
    StartActivity(share)
End Sub

طبق کد جایگذاری کن barname man اونجا هرچی بگی یه اینتر میزنه اخرش اضافه میکنه

[shahab.es 5,429]

با تشکر از bahman عزیز

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

مثلا برای rakroidsend به این شکل میشه

Dim s as send
s.initialize
s.ersalmatn(label1.text & CRLF & "matneEzafe","other")