Re: checken of ik met internet verbonden ben

Article View: be.comp.programming

Article #4875

Back to be.comp.programming Previous Next

#4875

From: gd
Date: Wed, 25 Jun 2003 06:38

28 lines
2172 bytes

On Tue, 24 Jun 2003 20:24:39 +0200, "edg" <edg@nospamskynet.be> wrote:

>
>"Red Head" <re_dhead@hotmail.com> schreef in bericht
>news:3ef876c1$0$311$ba620e4c@reader0.news.skynet.be...
>> hoe kan ik in VISUAL BASIC
>> checken of ik met het internet verbonden ben?
>
>gebruik maken van  InternetGetConnectedState in de wininet  api. Voorbeelden
>op de site van microsoft of internet
>
>
Misschien kan dit je op weg helpen :

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
Dim sConnType As String * 255
Private Sub Form_Load()
    Dim Ret As Long
    Ret = InternetGetConnectedStateEx(Ret, sConnType, 254, 0)
    If Ret = 1 Then
        MsgBox "You are connected to Internet via a " & sConnType,
vbInformation
    Else
        MsgBox "You are not connected to internet", vbInformation
    End If
End Sub

Technical Details

Message-ID: <cmgifv04afq3s25lrptcuerf6phdq6bcr1@4ax.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!proxad.net!nerim.net!aotearoa.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

References: <3ef876c1$0$311$ba620e4c@reader0.news.skynet.be> <3ef8976e$0$1046$ba620e4c@reader1.news.skynet.be>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fcea4,46c14f4310e7a002
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2003-06-24 23:38:42 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!proxad.net!nerim.net!aotearoa.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: gd <geert.demuynck____NOSPAM____@pandorapotdorie.be>
Newsgroups: be.comp.programming
Subject: Re: checken of ik met internet verbonden ben
Message-ID: <cmgifv04afq3s25lrptcuerf6phdq6bcr1@4ax.com>
References: <3ef876c1$0$311$ba620e4c@reader0.news.skynet.be> <3ef8976e$0$1046$ba620e4c@reader1.news.skynet.be>
X-Newsreader: Forte Agent 1.93/32.576 Nederlands
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Lines: 30
Date: Wed, 25 Jun 2003 06:38:36 GMT
NNTP-Posting-Host: 213.224.111.66
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1056523116 213.224.111.66 (Wed, 25 Jun 2003 08:38:36 MET DST)
NNTP-Posting-Date: Wed, 25 Jun 2003 08:38:36 MET DST
Organization: Telenet Internet

Reply to Parent Message