اطلاعیه

Collapse
No announcement yet.

مشکل در دریافت اطلاعات از sim908 با پورت سریال!

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    مشکل در دریافت اطلاعات از sim908 با پورت سریال!

    سلام!
    کد زیر را ببنید!
    این کد قراره که اول موقعیت و .. را از ماژول بگیره و بعد اونا را sms کنه!چ
    ولی توی sms که میاد فقط مینویسه AT
    دستور AT را هم به ماژول فرستادم ولی به جای OK فقط AT را میفرسته!
    ممنون میشم راهنمایی کنید!
    کد:
    $regfile = "m8def.dat"
    $crystal = 8000000
    $baud = 9600
    $hwstack = 64
    $swstack = 64
    $framesize = 64
    
    Dim B As Byte
    Dim C As Byte
    Dim Txt As String * 250 : Txt = ""
    Config Portb.0 = Input
    
    Do
    
    Print "AT"
    Waitms 200
    Print "AT+CGPSPWR=1"
    Waitms 500
    Print "AT+CGPSRST=1"
    Waitms 500
    Print "AT+CGPSINF=2"
    Waitms 2500
    
    Do
    B = Inkey()
    Select Case B
    Case 0:
    Case 13 :
    If Txt <> "" Then Exit Do
    Case 10 :
    If Txt <> "" Then Exit Do
    Case Else
    Txt = Txt + Chr(b)
    End Select
    Loop
    
    Print "AT+CMGF=1"
    Waitms 500
    Print "AT+CMGS=" ; Chr(34) ; "09372780864" ; Chr(34)
    Waitms 500
    Print Txt ; Chr(26)
    Waitms 500
    
    Wait 1
    Loop
    End

    #2
    پاسخ : مشکل در دریافت اطلاعات از sim908 با پورت سریال!

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

    Print "ATE0".
    Waitms 600

    دیدگاه


      #3
      پاسخ : مشکل در دریافت اطلاعات از sim908 با پورت سریال!

      نوشته اصلی توسط مهندس نوآور
      فکر کنم این دستور رو باید به برنامه ات اضافه کنی:

      Print "ATE0".
      Waitms 600
      این را هم اضافه کردم ولی بازم فقط AT را مبفرسته!

      دیدگاه


        #4
        پاسخ : مشکل در دریافت اطلاعات از sim908 با پورت سریال!

        چرا هیچ کس نمیتونه جواب سوالای من را بده!
        این همه میگند انجمن eca همین بود!

        دیدگاه

        لطفا صبر کنید...
        X