[boudyonline]

اخي الفاضل :

يمكنك التحقق من وجود الاتصال بالانترنت من خلال تجربة الاتصال على موقع ما وليكن جوجل
ويمكنك استخدام الكود التالي :

كود :

Public Function HaveInternetConnection() As Boolean

   Try
       Return My.Computer.Network.Ping("www.google.com")
   Catch
       Return False
   End Try

End Function