سوال در مورد ارسال sms

[parham01 82]

سلام بعد از عدم موفقیت در انتخاب سیم کارت برای ارسال sms

 

یاد یه سری از برنامه ها افتادم

که قسمت ارتباط با ما میومد

متن آماده ای رو تو  قسمت اس ام اس گوشی میاورد

و در قسمت شماره هم شماره خودشون میومد

 

یعنی sms  گوشی

متن و شماره آماده بود فقط یه گزینه ارسال داشت

 

 دوستان کسی آگاهی در این مورد داره ؟

[shahab.es 5,429]

سلام

dim str as string = "متن من"
Dim In As Intent
Dim number = "09388091472" As String
In.Initialize(In.ACTION_VIEW, "sms:" & number)
In.PutExtra("sms_body", str)
StartActivity(In)