چک کردن اتصال به اینترنت

[علیرضا.ا]

سلام
یه سورس میخام برای چک کردن اتصال به اینترنت
میخام کاملا مطمئن باشه
درصد خطا نداشته باشه...

[Hossis]

if my.computer.network.isavalable then
Msgbox ("connect")
Else
Msgbox ("NO connect")
End if

[علیرضا.ا]

این کد رو داشتم ولی اینجا گفته که فقط شبکه رو چک میکنه...

لینک (http://barnamenevis.org/showthread.php?154493-%DA%86%DA%A9-%DA%A9%D8%B1%D8%AF%D9%86-%D8%A7%D8%AA%D8%B5%D8%A7%D9%84-%D8%A8%D9%87-%D8%A7%DB%8C%D9%86%D8%AA%D8%B1%D9%86%D8%AA-%D8%AF%D8%B1-%D9%87%D8%B1-%DA%86%D9%86%D8%AF-%D8%AB%D8%A7%D9%86%DB%8C%D9%87%D8%9F&p=704478&viewfull=1#post704478)

[hosein320]

شما میتونی به یه سایت ping کنی
اگه خطا بده که یعنی وصل نیست اگر هم نده که یعنی وصله

[علیرضا.ا]

مبتدی تشریف دارم:D
یه نمونه اگه ممکنه بزارین:)

[astyage]

If (NetworkInformation.NetworkInterface.GetIsNetworkA vailable = True) Then
اتصال برقرار است
else
اتصال برقرار نیست
End If

[hosein320]

Try
My.Computer.Network.Ping("www.google.com")
'برقرار است
Catch ex As Exception
'برقرار نیست
End Try