الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف نعرف منفذ المودم برمجياً

مغلق
بدأه AbuBakr في 19 مارس 2003 · 3 رد · 719 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

هل يمكنكم مساعدتي في معرفة رقم المنفذ الذي تم إعداد المودم عليه

و ذلك عن طريق شيفرة بالفيجوال بيسك6؟؟؟؟

#2

اضف هذة الاداة MSComm1 ثم ضع الكود فى حدث التحميل للفورم

Private Sub Form_Load()

MSComm1.Settings = "9600,N,8,1"

' لوب للتشييك على عشرة منافذ وإستخراج رقم منفذ المودوم الصحيح

For i = 1 To 10

MSComm1.CommPort = i

On Error GoTo N

MSComm1.PortOpen = True

N:

If MSComm1.PortOpen = True Then

Exit For

End If

Next

End Sub

Private Sub MSComm1_OnComm()

If MSComm1.CommEvent Then

MsgBox " وصول إتصال لك "

End If

End Sub

وَقُل رَّبِّ زِدْنِي عِلْماً

#3

لقد جربت طريقتك يا أخ arafa

لكنها لم تعمل

أريد طريقة مضمونة 100%

و تجدر الإشارةإلى أنه يفيد كثيراً في التعامل مع المودم معرفة أوامر

AT Command

و يمكن تجريبها في الهايبر تيرمينال

اكتب بأحرف كبيرة

ATI1

فتحصل على اسم المودم

ATI3

لتحصل على اسم الرقاقة الالكترونية

و العديد العديد من الأوامر

وجدت هذا الملف المرفق

و هو أيضاً غير عملي 100%

#4

:rolleyes:هذا هو الملف المرفق

mdmchk.zip

هذا الموضوع مغلق.

مواضيع مشابهة