[mmaalmesry]

السلام عليكم و رحمة الله و بركاته

أريد كود فيجوال بيسيك يبين حالة الإنترنت هل متصل أم لا أى هل يعمل النت أم لا

 ولكم جزيل الشكر

[justforit]

(01-09-25, 08:46 AM)mmaalmesry كتب : السلام عليكم و رحمة الله و بركاته

أريد كود فيجوال بيسيك يبين حالة الإنترنت هل متصل أم لا أى هل يعمل النت أم لا

 ولكم جزيل الشكر

و عليكم السلام ورحمة الله وبركاته

PHP كود :

Public Shared Function CheckForInternetConnection() As Boolean
    Try
        Using client = New WebClient()
            Using stream = client.OpenRead("http://www.google.com")
                Return True
            End Using
        End Using
    Catch
        Return False
    End Try
End Function 


هذا الرابط نفس سؤالك

[mmaalmesry]

شكرا لك

[mmaalmesry]

هذا مثال آخر عن طريق ال API

[أبو خالد الشكري]

كود :

Imports System.Net

Public Class Form1
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       CheckForInternetConnection()
   End Sub
   Public Shared Function CheckForInternetConnection() As Boolean
       Try
           Using client = New WebClient()
               Using stream = client.OpenRead("http://www.google.com")
                   MessageBox.Show("توجد إنترنت")
                   Return True
               End Using
           End Using
       Catch
           MessageBox.Show("لا توجد إنترنت")
           Return False
       End Try
   End Function

مرحبا بكم جميعا
فقط ملاحظة صغيرة :
ستحتاج إلى إضافة السطر التالي في قسم التصريحات العامة
Imports System.Net

* وإضافة بسيطة على الكود !