منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] مساعدة من خبراء المنتدى - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] مساعدة من خبراء المنتدى (/showthread.php?tid=16080)

مساعدة من خبراء المنتدى - riad21 - 08-06-16

السلام عليكم و رحمة الله و بركاته
اولا رمضان مبارك للجميع , وهده اولى مشاركاتي فى هدا المنتدى الجميل ولدي طلب بسيط من خبراء المنتدى الرائع و هو
انا اعمل على برنامج فليكسي ب vb net 2010 و بعد مجهود كبير توصلت الى تقنية الارسال عن طريق اوامر  AT command
ولكن صادفنى مشكل وهو عند عملية ارسال الرصيد  يتوقف الهاتف عند عملية التأكيد وهى كاالتالى
vous vouler transférer 40da vers le  numero
1: tapez 1 pour confirmer
0: tapez 0 pour annuler
وهدا هو  كود الارسال فى شريحة  المتعامل موبيليس  
 
كود :
Me.Cursor = Cursors.WaitCursor
       If Number.Text = "" Then
           MsgBox("inserer votre numero", MsgBoxStyle.Information)
       Else
       End If
       
       If Number.Text.StartsWith("06") Then
           Dim comPort As SerialPort = My.Computer.Ports.OpenSerialPort(PortM.Text)

           comPort.Write("ATD" + "*" + CODE.Text + "*" + Number.Text + "*" + SOLD.Text + "*" + PIN1.Text + "#" & vbCrLf)

           Label1.Show()
           comPort.ReadTimeout = 3000000 '300ms
           comPort.WriteTimeout = 3000000 '300ms
           ' Receive strings from a serial port
           '
           Number.Text = ""
           SOLD.Text = ""
           mobilisBox.Show()
           ComboBox1.Text = "Mobilis"

           'WAIT FIVE SECONDS
           comPort.ReadLine()
           comPort.WriteLine("ATD = 1" & vbCrLf)
           Label1.Hide()
           comPort.Close()
       Else
       End If

المطلوب هو اني اريد كود  او   امر من  اوامر AT  فى vb net  لاكمال عملية التاكيد  وارسال الرصيد بشكل عادي
واتمنى من خبراء المنتدى الا  يبخلو على بهدا الطلب  البسيط  و انا واثق من  دلك

RE: مساعدة من خبراء المنتدى - riad21 - 10-06-16

انا فى انتظار مساعدتكم يا اخوان

RE: مساعدة من خبراء المنتدى - riad21 - 15-06-16

السلام عليكم  و رحمة الله و بركاته
الحمد لله لقد توصلت الى الحل  و و جدت طريقة ارسال الرصيد  و معرفته و لكن اخواني واجهتني مشكلة اخرى وهي 
عند ارسال الرصيد اريد اظهار معلومات الارسال  فى البرنامج عن طريق اداة  listview او  textbox او بالاحرى
اريد محاكاة الهاتف و اظهار البيانات في البرنامج و ما هى الادوات  المستعملة مع شرح استعمالها و طريقة التعامل معها 
من فضلكم انا فى انتظار ردكم