Online/Offline?

Du kan f.eks. hvis det er til server brug..bruge en Fucktion der hedder IpMonotor Fra Mediahouse.. den undersøger en given server service ved at pinge den.. derved kan du se up/downtime!

www.deepmetrix.com download en trial og registere den med et crack fra www.cracks.am

'----------------------------------- Form1 -----------------------------------
Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef _
                        lpSFlags As Long, ByVal dwReserved As Long) As Long

Const INTERNET_CONNECTION_LAN As Long = &H2
Const INTERNET_CONNECTION_MODEM As Long = &H1

Public Function Online() As Boolean
  Online = InternetGetConnectedState(0&, 0&)
End Function

Public Function ViaLAN() As Boolean
Dim SFlags As Long
  Call InternetGetConnectedState(SFlags, 0&)
  ViaLAN = SFlags And INTERNET_CONNECTION_LAN
End Function

Public Function ViaModem() As Boolean
Dim SFlags As Long
  Call InternetGetConnectedState(SFlags, 0&)
  ViaModem = SFlags And INTERNET_CONNECTION_MODEM
End Function

Private Sub Form_Load()
  Text1.Text = "LAN " & ViaLAN()
  Text2.Text = "Modem " & ViaModem()
  Text3.Text = "Online " & Online()
End Sub
'----------------------------------- Form1 -----------------------------------

sjh: det var lige gvad jeg skulle bruge
Fiskeren: Tak men det var en funktion (som f.eks. sjhs api call) jeg ville have