پاک کردن پیام از روی شماره

[esmaeil57 64]

سلام

واقعا با این همه نابغه توی این سایت و برنامه هایی که من میبینم که خیلی هاش پیشرفته تر از اونیه که من میخوام هیچکس جواب منو نمیتونه بده!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

آقا من میخوام یه پیام رو توی بیسیک اندروید پاک کنم؟؟؟؟؟

ممنون اگه کسی منو راهنمایی کنه

[mahfelsoft 130]

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

[مجید آرتا 5,874]

این سورس خب ماله اینه که پیامی توی اینباکس قرار نگیره.

[mahfelsoft 130]

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

[مهدی ایزدی 9,203]

آقا از smsInteceptor استفاده کنید جواب میده :-d

[esmaeil57 64]

سلام استاد

آخرش جواب داد. فقط وقتى برنامه رو هم ميبنديم باز پيام هاى عاديمون هم توى اينباکس نميره! بايد گوشى رو ريبوت کنم!

[esmaeil57 64]

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

سلام

آخه دوست عزیز شما باید اون متغیر smm.Body رو ازش اسفاده کنی مثلا بذاری توی یه لیبل یا ....

یا علی

[esmaeil57 64]

آقا ممنونم جواب داد آخرش. تشکر

[ارمین رمضانی دلیجانی 381]

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

موفق باشید

[esmaeil57 64]

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

ببینید ، خود متغیر فوق الذکر دربرگیرنده متن پیام هست . شما باید توی سرویس یه متغییر مثلا به نام Message تعریف کرده و اون رو مساوی با smm.body قرار بدین و سپس توی اکتیویته مورد نظرتون بیایین بگین Label1.text=smsm.Message البته یادتون باشه در ابتدای برنامه باید سرویس رو استارت و در موقع بستن باید سرویس رو استوپ کنید.

موفق باشین

[مصطفی حقیقی 176]

Sub Process_Globals
   Dim bc As BroadCastReceiver

End Sub
Sub Service_Create
   bc.Initialize("BroadcastReceiver")
   bc.addAction(bc.SMS_RECEIVED)
   bc.SetPriority(2147483647)
   bc.registerReceiver("") 'here you can add the main action (intent)
End Sub
Sub Service_Start (StartingIntent As Intent)

End Sub
Sub BroadcastReceiver_OnReceive (Action As String,i As Object)
   bc.AbortBroadcast()
End Sub

دیگه هیچ پیامی به inbox نمیره که بخواین پاک کنین

میتونین حالت شرطی هم بذارین که اگه فلان مسیج بود یا فلان شماره فرستنده بود Abort کنه

[esmaeil57 64]

سلام استاد

امتحان میکنم اگه جواب داد یک دنیا ممنون و متشکر میشم ازتون

اون شماره ای که داخل Setpriority نوشتین چیه؟ آیا باید دقیقا همون نوشته شه؟

یه سوال: متغیر BroadCastReceiver مال چه کتابخونه ایه؟ توی برنامه من که قبول نمیکنه!!!!

[مصطفی حقیقی 176]

بفرما

اینم کتابخونه

BroadcastReceiver2.0.zip

[esmaeil57 64]

الان با اين ورژن به نظر شما مشکل حل ميشه؟

[مصطفی حقیقی 176]

فکر نکنم دیگه مشکلی باشه

من از همین روش تو eclipse دارم استفاده می کنم و همیشه جواب گرفتم

ایشالا که جواب میده

[esmaeil57 64]

انشاالله فردا امتحان ميکنم. الان با موبايلم. خبرشو ميدم.ممنون

[mahfelsoft 130]

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

[MrMedia 98]

اینم نمونه داداش

یه کتابخونه هم توش هست

اونم کپی کنید تو پوشه کتاخونه ها B4A

برای گرفتن شماره و پیام از Intent ه

موفق باشید

 

 

سلام من از این مثال استفاده کردم ولی جواب نداد

 

گوشی من 2 سیم هستش و از خطی که پیشفرض گذاشتم واسه پیام به خط دومم پیام فرستادم ولی نتیجه نداد و پیام بعد از فرستاده شدن تو inbox میاد

 

این کدی هستش که اضافه کردم کجاش اشتباهه؟

Sub Button1_Click
p.Send2("09123456780","www.Basic4Android.org",False,False)
End Sub

[مصطفی حقیقی 176]

اینم نمونه داداش

یه کتابخونه هم توش هست

اونم کپی کنید تو پوشه کتاخونه ها B4A

برای گرفتن شماره و پیام از Intent ه

موفق باشید

SMS.rar

[esmaeil57 64]

سلام استاد.

تشکر از لطف شما. فردا صبح امتحان ميکنم. موفق و مويد باشيد.

[MrMedia 98]

Sub Process_Globals Dim bc As BroadCastReceiver End Sub Sub Service_Create bc.Initialize("BroadcastReceiver") bc.addAction(bc.SMS_RECEIVED) bc.SetPriority(2147483647) bc.registerReceiver("") 'here you can add the main action (intent) End Sub Sub Service_Start (StartingIntent As Intent) End Sub Sub BroadcastReceiver_OnReceive (Action As String,i As Object) bc.AbortBroadcast() End Sub

 

سلام ببخشید میشه دوستان توزیح بدن این کدرو؟

ارسال sms تو این کد به کدوم شماره هستش و متن ارسالی چی هستش؟

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