[مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB6

بسم الله الرحمن الرحيم

هذا بداية لمشروع تخرجي، وكنت ادرسه واكتشف طرق التحكم الكمبيوتر بالعالم الخارجي
بدأت أكتشف بعض الأشياء، لكن هذي مجرد البداية
حبيت اعرض لكن بعض الأفكار عشان أفيدكم، وكمان إلي عنده خبرة ممكن يفيدني ويفيدكم

خلونا نستعرض بعض خواص الكيبل المتسلسل serial port COM
هو منفذ مكون من 9 فتحات
http://www.satmonkey.com/images/satmonkey/RS232.jpg
وهذا جدول ييوضح ترقيم الفتحات وعمل كل فتحة
http://www.aggsoft.com/rs232-pinout-...s/9-pinout.gif

أهم فتحتين عندنا هي 4 و 5
5 هو gnd يعني الأرضي
4 هو الإستعداد للإرسال
وهو إلي يخلي الكيبل يشتغل ويطفي
إلحين نقولكم وش نحتاج

كيبل متسلسل يكون طرفيه كلها أنثى
http://www.cty.ca/image/1173-1.jpg
انا اخترت هذا الكيبل عشانه أسهل في تركيب الأسلاك داخل التفحات

ونحتاج إلى أي LED أو إذا بتركبون مروحة مثلاُ لازم تركبون معاها دايوت عشان يوحد التيار
http://img.alibaba.com/photo/5062741...ing_Diode_.jpg
إلحين جاء دور التوصيل

نوصل الطرف السالب "كاثود" في السلك رقم 5
والطرف الموجب "أنود" في الطرف رقم 4

إلحين خلصنا شغل الهاردوير
باقي السوفت وير

زي ما قلت بنستخدم الفجوال بيسك 6
راح نستخدم الأداة MSComm1 http://www.9engineer.com/Inovation/RFID.h6.gif

http://www.9engineer.com/Inovation/RFID.h5.jpg


بعد ما نحط الأداة

تأكد أي فتحة انت تستخدم
لأنه فيه أكثر من فتحة تسلسلية

لو كانت رقم 1 وهو الأغلب
حط الكود هذا

كود:

---

Private Sub Form_Load()
MSComm1.CommPort = 1
End Sub

---

بعدين حط زر واكتب فيه الكود هذا

كود:

---

If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
Else
MSComm1.PortOpen = False
End If

---

وجرب وإدعولي ^^

كمل كمل، ورينا شغلك ^^
.. والله شكلك بتجننا بمفاجآتك :) ..

والله موضوع مفيد جداً
ياريت تفيدنا أكثر!

مشروع تخرجي كان شبيه بهذا المشروع

بس اني انا استخدمت الكمبيوتر كوسيط يستقببل رسائل جوال ثم يطفي ويشغل الاجهزة

ممكن ايضا تستخدم Parallel port اذا كنت تبغى تحكم في اجهزة اكثر او تستخدم Demultiplexer

مشكوووووووووووووووووين

اقتباس:

---

المشاركة الأصلية كتبت بواسطة سامي.خ

وجرب وإدعولي ^^

---

اسئل الله لك التوفيق ..

فعلاً زبطت معايه ..

لكن واجهني شيء غريب .. اللي هوه ..

عندما اضع الـ LED في المنفذ 4 و 5 >> لا يحدث شيء

وعندما اضعها في المنفذ 8 و 9 >> يزبط الوضع

ممكن تفسير ؟؟؟! :33:

لو تقرأ الفتحة رقم 4 تلاقي مكتوب "جاهز للإرسال البيانات"
السر هو اني اعطل وأفعل المنفذ فقط لا غير عن طريق برنامج

ما ادري ليش عندك يشتغل على 9 و 8 رغم ان الكل اشتغلت عند 4 و 5

مشكوووور على الموضوع الرائع
وربنا يوفقك في مشروعك

دخلت اكتشف واشوف مواضيعك ولقيتك ما شاء الله عليك XD

شوكراً مبدعة ونورتي موضوعي وقسم الإلكترونيات كله مع انه نايم في سابع نومه.
يا رب اشوفك مثلي وتحبين الإلكترونيات

السلام عليكم انا عملت مشروع لا يمكن تصوره
هل سمع احدكم بالتحكم في بيتك عن بعد
اطفاء و اشعال انوار المنزل عن طريق الانترنيت

اقتباس:

---

المشاركة الأصلية كتبت بواسطة watsmyname

السلام عليكم انا عملت مشروع لا يمكن تصوره
هل سمع احدكم بالتحكم في بيتك عن بعد
اطفاء و اشعال انوار المنزل عن طريق الانترنيت

---

نعم نعم ممكن ^^
ممكن تتحكم ببيتك من مكان آخر، احس اني ودي طبقها، بس يبغالها وقت فراغ طويل -_-
طبعاً ممكن تستفيد من فتحات الـ LPT احسن لأن فيها ثمانية مداخل وثمانية مخارج، وممكن تضرب المداخل ببعض ويصير عندك 16 منفذ ممكن تتحكم به ^^
شكراً لك اخي على التعليق

موضوع رهيييييييييب
بس ياليت تعيد رفع الصور المتعطله