رفتن به مطلب
  • 0

ارسال پیامک اتوماتیک؟


vistamobile

سوال

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

من دوتا گوشی دارم و هر دو تک سیم کارته. حالا به ذهنم رسید خودم برنامشو بسازم. میخوام اگر دوتا شماره پیامکی بانک و فروشگاهم که هر روز پیام میدن ، پیام اومد به خط اولم ، اتوماتیک بفرستم به خط دومم. تو اینترنت هی برنامه بود که رو گوشیم ایراد داره و فقط از میتونم بگم که از یکی پیام رو بده . تو بیسیک میشه کلا؟  :S

لینک ارسال
به اشتراک گذاری در سایت های دیگر

1 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

سلام مختار عزیز

 

بیا و با سرویس و با استفاده از کتابخانه Phone و تابع SmsInterceptor دریافت کن اس ام اس رو در سرویس و بهش بگو اگه از شماره فلان بود بفرستش به شماره ی دیگه >

 

ب این صورت :

 

توی پروسس گلوبال سرویس :

Dim si As SmsInterceptor

در سرویس کریت :

si.Initialize("si")

در سرویس استارت :

StartServiceAt("",DateTime.Now + 0.1*DateTime.TicksPerMinute,False)

و ساب زیر رو ایجاد کن واسه دریافت و شرط رو بذار :

Sub si_MessageReceived (From As String, Body As String) As Boolean
  If From = "شماره دریافتی" Then
  	Dim sms As PhoneSms
	sms.Send("شماره مقصد" , Body)
	ToastMessageShow("ارسال شد",True)
End If
End Sub  

دسترسی های زیر رو هم اضافه کن ب منیفست :

AddPermission("android.permission.SEND_SMS")
AddPermission("android.permission.RECEIVE_SMS")

خوب دیگه تمومه موفق باشید 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...