تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] التحقق من توصيل الجهاز بالانترنت
#1
السلام عليكم ورحمة الله
اريد دالة للتحقق من توصيل الجهاز بالانترنت
والتاكد من انه يعمل
لان فى دالة
My.Computer.Network.IsAvailable
لاكن للاسف انا مركب الروتر لاكن النت فاصل فتعطى True
هى تعتبر مجرد وجود كبل النت ان النت واصل
اريد التحقق مثلا من موقع مثل جوجول انه يعمل
اريد دالة اكتب رابط الموقع وهى تعود True او False وهذا اسلم حل فى نظرى
او اى فكرة اخرى
الرد }}}}
تم الشكر بواسطة:
#2
تحتاج تحققين:
1- الذي لديك ثم بعد التحقق منه تتحق من:
...2- صفحة انترنت مثلا قوقل .
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@
#3
طيب هل تعرف الدالة الثانية لانى لا اعرفها
وجزاك الله خيرا اخى سعود
الرد }}}}
تم الشكر بواسطة:
#4
لحظة اتذكرها لاني نسيتها Smile

كود :
If My.Computer.Network.IsAvailable Then
            Label1.BackColor = Color.Green
            Label1.Text = "الايثرنت موصول والراوتر او المودم يعمل"


            If My.Computer.Network.Ping("google.com") = True Then
                Label2.BackColor = Color.Green
                Label2.Text = "الانترنت موصول"
            Else
                Label2.BackColor = Color.Red
                Label2.Text = "الانترنت ليس موصول"
            End If



        Else
            Label1.BackColor = Color.Red
            Label1.Text = "الايثرنت ليس موصول او المودم ليس قيد التشغيل"
        End If



طبعا اللي عاجبني بالمثال المحاذاة بمربع الرسالة انها يمين توي عرفتها Smile


الملفات المرفقة
.zip   Internet_checker_v1.0.zip (الحجم : 30.56 ك ب / التحميلات : 153)
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
#5
الدالة
My.Computer.Network.Ping
تعود ب False دائما لا ادرى لماذا
الرد }}}}
تم الشكر بواسطة:
#6
(07-10-13, 02:58 PM)ali.alfoly كتب : الدالة
My.Computer.Network.Ping
تعود ب False دائما لا ادرى لماذا

شلون؟؟
لازم يكون الموقع اللي تستفسر عنه شغال!
اكتب مثال وارفعه حتى نشوفه.
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@
#7
PHP كود :
If My.Computer.Network.Ping("google.com"Then
                MsgBox
("موصول")
            Else
                
MsgBox("غير موصول")
            
End If 

حاولت اكثر من مرة
لا ادرى لماذا تعود ب ( غير موصول )
مع ان النت شغال تمام
الرد }}}}
تم الشكر بواسطة:
#8
اتمنى ان يناسبك

التحقق من الاتصال بالانترنت
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@
#9
جزاك الله خير اخى مالك
بس للاسف هى دى الدالة الى بنحكى عليها
ال Network يحتوى على 4 دوال تحميل ملف و رفع ملف و تحقق من الاتصال و تحقق من عمل موقع
شوف احنا استخدمنا التحقق منفعتش عارف ليه
لانى مشترك فى شبكة وهذه الشبكة عليها ميكرو تك لازم اسجل دخول
لو انا واضع الكبل فى الكمبيوتر ومش مسجل دخول المفروض انه مفيش نت
الدالة تقول انه فى نت وده خطاء
الدالة الثانية وهى دالة التحقق من عمل موقع الى استخدمها الاخ سعود
تعود بفولس لا ادرى لماذا لعل ذلك من الشبكة خاصتنا
طيب ايه الحل
فينك يا شاكى لله يا عفريت التعامل مع الانترنت
الرد }}}}
تم الشكر بواسطة:
#10
كود :
لعل ذلك من الشبكة خاصتنا
الموقع لو محجوب ايضا بيعطي False
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ياشباب ارجو المساعده رنامج لا جلب اي قاعده بيانات في الجهاز اكسس او اكسل وعرضها ammaraliali 5 151 15-01-17, 06:11 PM
آخر رد: khodor1985
  التحقق من وجود هذة القيمة فى الداتا جريد فيو مع العلم انى استخدم المعالج araxis 4 299 29-11-16, 07:26 AM
آخر رد: amgad525
  كود تغيير تاريخ الجهاز bidaya 13 471 20-09-16, 04:24 PM
آخر رد: أبو عمر
  التحقق من عدد السجلات abdulla2 5 252 08-09-16, 06:06 PM
آخر رد: abdulla2
  [VB.NET] طلب كود رابط بين الجهاز الخاص بي وجهاز اي شخص ثاني عند فتح البرنامج mostfa1995 6 384 01-09-16, 08:06 PM
آخر رد: mostfa1995
  كيف التحقق من صوره اذا كانت نفس الصورة ام لا Mohamed20 4 259 06-08-16, 03:55 PM
آخر رد: Mohamed20
  كود تحقق الاتصال بالانترنت وتسجيل تلقائي لايميل طالب 22 3 222 05-08-16, 01:04 AM
آخر رد: LoveVb
  [سؤال] شباب هل من الممكن التحقق من wi fi مفتوح ام مغلق احمد عبد الحكيم 4 291 27-05-16, 08:59 PM
آخر رد: CLARO
Video [VB.NET] مشكلة بالفيجول بيسك 2010 علي الجهاز محمد اسماعيل 1 208 20-05-16, 03:13 AM
آخر رد: boudyonline
  طلب كود التحقق من وجود الاتصال بالانترنت bidaya 5 445 29-04-16, 08:59 AM
آخر رد: honest

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم