مشكلة كوم بورت - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94) +--- قسم : مايكرسوفت أكسيس Microsoft Access (http://vb4arb.com/vb/forumdisplay.php?fid=170) +--- الموضوع : مشكلة كوم بورت (/showthread.php?tid=21169) |
مشكلة كوم بورت - aksaazza - 24-07-17 rs232 السلام عليكم اخواني عملت برنامج بالاكسيس يرتبط البرنامج بجهاز خارجي من خلال الكوم بورت بعد تشغيل البرنامج الداتا تنقل الى البرنامج غير انها تكون مشفرة علما ان الكود امكتوب في الفورم الرئيسي هو كالتالي فاين المشكلة وبارك الله فيكم If MSComm0.PortOpen Then MSComm0.PortOpen = False MSComm0.Settings = "1200,N,8,1" MSComm0.PortOpen = True MSComm0.InputLen = 0 MSComm0.RThreshold = 1 End Sub Private Sub MSComm0_OnComm() Dim Buffer As String If MSComm0.CommEvent = 2 Then Buffer = Buffer & MSComm0.Input & Chr(10) text1.Text = Buffer End If mscommm0 هي6 microsoft comm control من ضمن مكتبة mscomm32.ocx |