Test computer with an internet connection ?

DevX Home    Today's Headlines   Articles Archive   Tip Bank   Forums   

Results 1 to 2 of 2

Thread: Test computer with an internet connection ?

Hybrid View

  1. #1
    Join Date
    Mar 2008

    Test computer with an internet connection ?

    I want to search the code your computer with an internet connection, note: not the case on or off the network card

  2. #2
    Join Date
    Apr 2007
    Sterling Heights, Michigan
    Option Explicit
    Private Declare Function InternetGetConnectedStateEx Lib "wininet.dll" _
    (ByRef lpdwFlags As Long, ByVal lpszConnectionName As String, _
    ByVal dwNameLen As Integer, ByVal dwReserved As Long) As Long
    Private strConnType As String * 255
    End Sub
    Private Sub Form_Load()
        Dim Ret As Long
        Ret = InternetGetConnectedStateEx(Ret, strConnType, 254, 0)
        If Ret = 1 Then
            MsgBox "You are connected to Internet via a " & strConnType, vbInformation
            MsgBox "You are not connected to internet", vbInformation
        End If
    End Sub

Similar Threads

  1. Internet connection like Internet Explorer
    By Dudley Mills in forum VB Classic
    Replies: 0
    Last Post: 06-09-2002, 07:50 AM
  2. IM Test across internet
    By Richard Rowe in forum Enterprise
    Replies: 0
    Last Post: 07-05-2001, 10:34 AM
  3. Re: Test msg from new computer - ignore
    By Larry Linson in forum .NET
    Replies: 4
    Last Post: 07-03-2001, 07:27 PM
  4. Dial-up to a Computer not using internet
    By anonymous in forum VB Classic
    Replies: 1
    Last Post: 05-10-2001, 03:34 AM
  5. internet & computer security
    By Lily Chee in forum Security
    Replies: 1
    Last Post: 04-23-2001, 02:57 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
HTML5 Development Center
Latest Articles
Questions? Contact us.
Web Development
Latest Tips
Open Source

   Development Centers

   -- Android Development Center
   -- Cloud Development Project Center
   -- HTML5 Development Center
   -- Windows Mobile Development Center