مشکل در serial port [بایگانی]

ak1_2004

سه شنبه 07 اردیبهشت 1389, 17:29 عصر

سلام
من با استفاده از سریال پورت به یه GSM وصل شدم و با دستورات AT از طریق Hyper Terminal اس ام اس ها رو می خونم !
ولی از طریق VB.NET وقتی سورس زیر رو می نویسم کار نمی کنه !!!
یعنی هیچ خروجی بهم نشون نمی ده به جز دستوراتی که خودم وارد کردم !

SerialPort1.Open()
SerialPort1.WriteLine("AT+CMGL=""ALL""" & Chr(13))
RichTextBox1.Text = SerialPort1.ReadExisting
SerialPort1.Close()

ak1_2004

چهارشنبه 08 اردیبهشت 1389, 07:25 صبح

شاید بد گفتم !
ببینید
پس از اینکه در Hyper این دستور AT رو وارد می کنم تمام اس ام اس های موجود در سیم کارت نمایش داده می شه !
اما وقتی از طریق VB اقدام می کنم !
فقط می نویسه !

AT+CMGL="ALL"
OK

من اومدم یک دستور دیگه اضافه کردم ! یعنی یک بار دیگه خواندن رو انجام دادم و دوباره خروجی گرفتم مثل زیر

SerialPort1.Open()
SerialPort1.WriteLine("AT+CMGL=""ALL""" & Chr(13))
RichTextBox1.Text = SerialPort1.ReadExisting
SerialPort1.Readline()
RichTextBox1.Text += SerialPort1.ReadExisting
SerialPort1.Close()

با این دستور یکی از اس ام اس ها رو نشون می ده !
حالا من می خوام دستوری بنویسم که تا زمانی که اس ام اس وجود داره نمایش بده !
با حلقه While اقدام کردم ولی شرطش رو مشکل داشتم
ممنون می شم راهنمایی کنید !

ak1_2004

چهارشنبه 08 اردیبهشت 1389, 10:45 صبح

نبود ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

ak1_2004

چهارشنبه 08 اردیبهشت 1389, 19:52 عصر

لطفا راهنمایی کنید !