[LoveVb]

كود التحقق من الانترنت

كود :

   Function CheckNet() As Boolean
       If My.Computer.Network.IsAvailable Then
           Try
               Return My.Computer.Network.Ping("www.google.com")
           Catch
               Return False
           End Try
       End If
       Return False
   End Function

بالنسبه لتسجيل الدخول للجيميل هل تريده عبر webbrowser?