Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

Function IsNetworkInstalled() As Boolean
    Const SM_NETWORK = 63
    IsNetworkInstalled = GetSystemMetrics(SM_NETWORK)
End Function

Aby dodać komentarz zaloguj się. Jeśli nie masz konta, załóż je sobie.
Tylko zarejestrowani użytkownicy mogą pisać komentarze.

Powered by AkoComment 2.0!