السلام عليكم و رحمة الله
هل يمكنكم مساعدتي حول امكانية ال vb.net التعامل مع ال com port بحيث يمكننني ارسال data من جهاز الى اخر باستخدام برنامج معمول على ال vb.net
و لكم جزيل الشكر
com port
مغلق
السلام عليكم ورحمة الله وبركاته
ردى متأخر ولكن انا أول مره أرى فيها استفسارك
للتعامل مع الكوم بورت
من خلال الاداه microsoft comm control
يتم إضافة هذه الأداه من ال components
أولا تقوم بفتح البورت
MSComm.PortOpen = True
ثانيا إذا أردت إرسال أى بيانات إلى البورت
MSComm.Output ="الشئ المرسل"
ثالثا لإغلاق البورت
MSComm.PortOpen = False
استغفر الله العظيم من كل ذنب وأتوب إليه
شكرا ياباشا
سبحان الله وبحمده سبحان الله العظيم
لا اله الا الله محمدا رسول الله
اللهم اغفر للمسلمين والمسلمات والمؤمنين والمؤمنات الاحياء منهم والاموات
ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
حمل كريستال ريبورت 10 اربعه اصدارات
السلام عليكم و رحمة الله و بركاته
هذه الاداة MSComm لا تعمل بشكل جيد مع VB.NET
و غالبا تعطي رسالة خطا عند استعمالها
(لانها تحتاج الي ترخيص و الحل هو ان تقوم بتسطيب VB6 وتختار هذه الاداة فقط من ضمن مكونات التسطيب)
ولكن هناك حلول اخري منها:-
1- استعمال دوال API
مثل الدالة CreatFile و OpenFile
و هي تاخذ من ضمن معاملاتها اسم الملف (هنا يكون اسم البورت)
و بالتالي تستطيع التعامل مع البورت الذي تريده
2-استخدام اداة SerialPort
وهي موجودة في VS.NET2005
و هي اداة سهلة الاستخدام و مشابهه للاداة MSComm
سلام
تم تعديل هذه المشاركة بواسطة Ingm في 16 أغسطس 2005 في 08:06
حكمتي الدائمة.....................................................
ان ما عند الله لا يطلب الا بطاعته
.....................................................................
?who is Ingm
Name: Hasan Adel Hasan
Education: BCs in IS from Faculty of computers & information systems
Mansoura University- 2003
E-mail: hsn_3004@yahoo.com
السلام عليكم :)
أخى العزيز Ingm
اقتباسهذه الاداة MSComm لا تعمل بشكل جيد مع VB.NETو غالبا تعطي رسالة خطا عند استعمالها
أنا تعاملت معها ب VS.net 2003
ولم تظهر لى أى رسالة خطأ
وأنا الان أعمل بها مشروع جديد بال VB.net 2003
وإلى الآن لم تظهر لى مشاكل
الرجاء إذا كنت متأكد من هذا الموضوع إخبارى بذلك حتى لا أقع فى ورطه :(
وشكرا لك
استغفر الله العظيم من كل ذنب وأتوب إليه
بسم الله الرحمن الرحيم
رسالة الخطا التي ذكرتها من قبل تظهر فقط لمن ليس عندهم الترخيص الخاص بهذه الاداة
و ما دمت تستخدمها في مشروعك و لم يظهر لك تلك الرسالة
فتوكل علي الله و لا تقلق
سلام
حكمتي الدائمة.....................................................
ان ما عند الله لا يطلب الا بطاعته
.....................................................................
?who is Ingm
Name: Hasan Adel Hasan
Education: BCs in IS from Faculty of computers & information systems
Mansoura University- 2003
E-mail: hsn_3004@yahoo.com
السادة الافاضل
لدى كود يعمل و لكن يحتاج الى تعديل بسيط التعديل هو ان
' sets port variable to COM1
'MSComm.Comport = 1
' opens the port for communication
MSComm.PortOpen = True
'sets the protocol to match the pole display
MSComm.Settings = "9600,N,8,1"
' Reset & set normal display model
MSComm.Output = Chr$(31) + Chr$(17)
' sends a sample character to the pole display
MSComm.Output = Chr$("100")
المسكلة فى السطر السابق - فأنا اريد وضع اسم الحقل المراد ارسال محتوياتة مكان Chr$("100")
مثال اذا كان يوجد حقل يسمى Display و يحتوى على رقم 1505
اريد ان يرسل البرنامج الرقم المجود داخل الحقل الى الكوم بورت كما هى بالحق
فكيف اكتب هذا الكود
' Chr$(67)
'MSComm.Value = [Display]
' closes the port
MSComm.PortOpen =
و لسيادتكم جزيل الشكر
اخوكم الصغير
ايمن عمارة
تلميذ و جاى يتعلم
تم تعديل هذه المشاركة بواسطة aymanemara1 في 20 أغسطس 2005 في 01:28
[
color=#33FF33]جمعية صناع الحياة التكنولوجية - مصر
أخوكم الصغير
ايمن عمارة
تلميذ و جاى يتعلم
هذا الموضوع مغلق.