1 مرفق
[مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي 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
وجرب وإدعولي ^^
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
كمل كمل، ورينا شغلك ^^
.. والله شكلك بتجننا بمفاجآتك :) ..
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
والله موضوع مفيد جداً
ياريت تفيدنا أكثر!
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
مشروع تخرجي كان شبيه بهذا المشروع
بس اني انا استخدمت الكمبيوتر كوسيط يستقببل رسائل جوال ثم يطفي ويشغل الاجهزة
ممكن ايضا تستخدم Parallel port اذا كنت تبغى تحكم في اجهزة اكثر او تستخدم Demultiplexer
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
اقتباس:
المشاركة الأصلية كتبت بواسطة سامي.خ
وجرب وإدعولي ^^
اسئل الله لك التوفيق ..
فعلاً زبطت معايه ..
لكن واجهني شيء غريب .. اللي هوه ..
عندما اضع الـ LED في المنفذ 4 و 5 >> لا يحدث شيء
وعندما اضعها في المنفذ 8 و 9 >> يزبط الوضع
ممكن تفسير ؟؟؟! :33:
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
لو تقرأ الفتحة رقم 4 تلاقي مكتوب "جاهز للإرسال البيانات"
السر هو اني اعطل وأفعل المنفذ فقط لا غير عن طريق برنامج
ما ادري ليش عندك يشتغل على 9 و 8 رغم ان الكل اشتغلت عند 4 و 5
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
مشكوووور على الموضوع الرائع
وربنا يوفقك في مشروعك
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
دخلت اكتشف واشوف مواضيعك ولقيتك ما شاء الله عليك XD
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
شوكراً مبدعة ونورتي موضوعي وقسم الإلكترونيات كله مع انه نايم في سابع نومه.
يا رب اشوفك مثلي وتحبين الإلكترونيات
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
السلام عليكم انا عملت مشروع لا يمكن تصوره
هل سمع احدكم بالتحكم في بيتك عن بعد
اطفاء و اشعال انوار المنزل عن طريق الانترنيت
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
اقتباس:
المشاركة الأصلية كتبت بواسطة watsmyname
السلام عليكم انا عملت مشروع لا يمكن تصوره
هل سمع احدكم بالتحكم في بيتك عن بعد
اطفاء و اشعال انوار المنزل عن طريق الانترنيت
نعم نعم ممكن ^^
ممكن تتحكم ببيتك من مكان آخر، احس اني ودي طبقها، بس يبغالها وقت فراغ طويل -_-
طبعاً ممكن تستفيد من فتحات الـ LPT احسن لأن فيها ثمانية مداخل وثمانية مخارج، وممكن تضرب المداخل ببعض ويصير عندك 16 منفذ ممكن تتحكم به ^^
شكراً لك اخي على التعليق
رد: [مشروع] تحكم في تشغيل أي جهاز وإغلاقه عن طريق كيبل التسلسلي com serial ببرنامج VB
موضوع رهيييييييييب
بس ياليت تعيد رفع الصور المتعطله