رتبه موضوع:
  • 17 رای - 2.94 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
سورس کد چک کردن وضعیت اتصال به اینترنت
#1
Check if an Internet Connection is available


کد پی‌اچ‌پی:
''' <summary>
''' 
Pings a variation of websites defined in a array and checks for connectivity.
''' </summary>
''' 
<returns>True if a ping succeededFalse if otherwise.</returns>
''' <remarks></remarks>
Public Function isInternetAvailable() As Boolean
    ' 
The arrays of sites we want to check for connectivity.
    
' If all fail to ping, the function will return false.
    Dim sitesToCheck() As String = {"www.google.com", _
    "www.microsoft.com", "www.dreamincode.net"}

    Dim failedPings As Integer = 0

    ' 
Loop through all hostnames and ping them
    
For Each str As String In sitesToCheck
        
Try
            
My.Computer.Network.Ping(str)
        Catch 
ex As Exception
            failedPings 
+= 1
        End 
Try
    
Next

    
' Couldn't ping any of the hostnames.
    If 
failedPings sitesToCheck.Length Then Return False
    
Return True
End 
Function

' Example Usage
MessageBox.Show(isInternetAvailable()) 
در صورتی که سوال دارید و سوالتون مختصر هست با شماره 09120642214 میتونید تماس بگیرید.
کسانی که دوست دارن در کانال فروشگاه ما و یا کانال انجمن عضو بشن یک پیامک در تلگرام برای من بفرستید که عضوشون میکنم.

ادرس فروشگاه :

http://www.amshop.ir



ای ام شاپ را در اینستگرام دنبال کنید

ای ام شاپ رو در کانال تلگرام دنبال کنید



This forum uses Lukasz Tkacz MyBB addons.
پاسخ


موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  سورس کد اضافه اپدیت حذف سرچ در اکسس (وی بی دات نت) Amin_Mansouri 2 4,592 04-07-2013، 10:50 AM
آخرین ارسال: Amin_Mansouri
  سورس کد تبدیل ویدئو به فرمت های 3gp mp4 و..(وی بی دات نت) Amin_Mansouri 0 2,198 01-31-2013، 07:22 PM
آخرین ارسال: Amin_Mansouri
  سورس کد پروژه مدیریت هتل (vb.net) Amin_Mansouri 0 2,326 01-31-2013، 07:13 PM
آخرین ارسال: Amin_Mansouri
  سورس کد چک کردن وضعیت سیستم عامل (ویژوال بیسیک دات نت) Amin_Mansouri 0 1,812 09-29-2012، 12:48 AM
آخرین ارسال: Amin_Mansouri
  سورس ماشین حساب پیشرفته kazemfallahi1371 0 1,472 07-01-2012، 01:49 AM
آخرین ارسال: kazemfallahi1371
  سورس کد خواندن فایل Pdf (وی بی دات نت) Amin_Mansouri 0 4,657 06-08-2012، 10:16 PM
آخرین ارسال: Amin_Mansouri
  سورس کد پرینت گزارش توسط کریستال ریپورت (وی بی دات نت) Amin_Mansouri 1 5,229 05-30-2012، 05:15 PM
آخرین ارسال: parvin
  سورس کد تغییر نام سطل زباله سیستم عامل (وی بی دات نت) Amin_Mansouri 0 1,839 05-02-2012، 04:08 PM
آخرین ارسال: Amin_Mansouri
  سورس کد تبدیل تصویر رنگی به سیاه سفید Amin_Mansouri 0 3,731 01-20-2012، 01:16 PM
آخرین ارسال: Amin_Mansouri
  سورس کد بدست اوردن درجه دمای سی پی یو Amin_Mansouri 0 3,922 01-20-2012، 01:07 PM
آخرین ارسال: Amin_Mansouri

پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان
<------> <____> <<<<----------------->>>> <<<<--->>>>>
This forum uses Lukasz Tkacz MyBB addons.