$ping = Ping("www.google.com")
If Not @error Then
    MsgBox(64, "Connections", "Co INTERNET")
Else
    MsgBox(65, "Connections", "Khong Co INTERNET")
EndIf