با سلام مجدد .چند روزی درگیر این پروژه بودم .در حین اجرای پروژه بالاخره تونستم مدارم و ببندم و برای تعریف شماره تلفن در حافظه میکرو بتدابه ماژول sms دادم و شماره اون پیام رو ذخیره کردم اینجوری راحتتره و نیاز به کیپد نداره.دوستان راه حل های ارایه دادن ولی فرمول های ناقص نه تنها بی فایده هستندبلکه وقت ادم و می گیرند. برای فرمولی که جناب اقای yosef55 عزیزارایه دادند .یه شبانه روز ذهن من و مشغول خودش کرد.
به هر صورت مشکلی که در عنوان این تاپیک بودحل کردم.البته دور زدم.
مشکلی که الان با این ماژول دارم اینه که بعضی اوقات تمام مشخصات اس ام اس ارسالی از ماژول شامل تاریخ ،ساعت و...درال سی دی نمایش داده می شه .انچه که مدنظر قرار می گیره متن اس ام اس هست .ولی تاریخ و ساعت و unreac sms از متن جدا نمی شوند.
دستورش هم از همون روش معروف ()b=inkeyهستشdim sms as string*20
dim g as byte , b as byte
.
.
.
Print "AT+CMGR=1"
" "=sms
Do
( ) B = Inkey
Select Case B
Case 0:
Case 13:
If Sms <> " " Then Exit Do
Case 10:
If Sms <> "" Then Exit Do
Case Else
(Sms = Sms + Chr(b
End Select
Loop
lcd sms
دوستان عزیز با اجرای برنامه بالا باید متن خالص اس ام اس ازکل عبارت ،خارج بشه بعضی وقت ها این اتفاق می افته ولی بعضی اوقات کل مخلفات اس ام اس بر وی ال سی دی نمایش داده میشه.برا ی حل این مشکل چه راه حلی پیشنهاد میدید؟