منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استفسار :- بخصوص ارسال نص ورقم Ascii في SerialPort
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله

استفساري عن كيفية ارسال حرف وارقام في SerialPort  بخاصية Ascii 

انا عندي هذا هذا الرقم

إقتباس :FA14073075;

كيف ارساله

حاولة كذا

كود :
  SerialPort1.Write(RichTextBox1.Text)


بس ما ضبط

ما عندي فكرة بخصوص Ascii 

وشكرا لكم
(29-08-18, 06:49 PM)dubai.eig كتب : [ -> ]السلام عليكم ورحمة الله

استفساري عن كيفية ارسال حرف وارقام في SerialPort  بخاصية Ascii 

انا عندي هذا هذا الرقم

إقتباس :FA14073075;

كيف ارساله

حاولة كذا

كود :
  SerialPort1.Write(RichTextBox1.Text)


بس ما ضبط

ما عندي فكرة بخصوص Ascii 

وشكرا لكم


لم يسبق لي التعامل مع أداة serialport

لكن جرب هذه الطريقة
PHP كود :
Dim arr() As Byte System.Text.Encoding.ASCII.GetBytes("FA14073075;")
SerialPort1.Write(arr0arr.Length


وقد تكون طريقتك صحيحة وتم إرسال النص فعلاً ولكن تحتاج إلى إجراءات أخرى بعدها
(29-08-18, 07:02 PM)عابر سبيل 2 كتب : [ -> ]
(29-08-18, 06:49 PM)dubai.eig كتب : [ -> ]السلام عليكم ورحمة الله

استفساري عن كيفية ارسال حرف وارقام في SerialPort  بخاصية Ascii 

انا عندي هذا هذا الرقم

إقتباس :FA14073075;

كيف ارساله

حاولة كذا

كود :
  SerialPort1.Write(RichTextBox1.Text)


بس ما ضبط

ما عندي فكرة بخصوص Ascii 

وشكرا لكم


لم يسبق لي التعامل مع أداة serialport

لكن جرب هذه الطريقة
PHP كود :
Dim arr() As Byte System.Text.Encoding.ASCII.GetBytes("FA14073075;")
SerialPort1.Write(arr0arr.Length


وقد تكون طريقتك صحيحة وتم إرسال النص فعلاً ولكن تحتاج إلى إجراءات أخرى بعدها

شكرا على التواجد الكريم

جربت بس ما ضبط لم يتم الارسال لان اعتقد يجب ترجمه ال FA14073075;  الى Ascii   انا جالس اعمل بحث لاشوف كيف الوضع

في ملف الرموز الخاص  حصلت هذا المسج
[attachment=19277]

[attachment=19278]
وجدت في أحد المواقع يشير لهذا الكود الخا بالترميز
لا أدري هل يفيد
PHP كود :
SerialPort1.Encoding System.Text.Encoding.ASCII 
(29-08-18, 08:28 PM)عابر سبيل 2 كتب : [ -> ]
وجدت في أحد المواقع يشير لهذا الكود الخا بالترميز
لا أدري هل يفيد
PHP كود :
SerialPort1.Encoding System.Text.Encoding.ASCII 


الحمدالله اخيرا ضبط

الكود هذا شغال

كود :
Dim arr() As Byte = System.Text.Encoding.ASCII.GetBytes("FA14073075;")
SerialPort1.Write(arr, 0, arr.Length)


المشكله كانت من

[attachment=19284]

SerialPort1

RTS
يجب ان يكون
true


شكرا من جديد لك بارك الله فيك Rolleyes
عملكم رائع فاحسن الله لكم لكل خير يتم تقديمه
والاخ عابر سبيل 2 ما قصر فى تواصل تقديم المساعدة

فتحياتى لكم
وتمنياتى لكم التوفيق