Hvordan fanger jeg IP og MAC adresserne

Ip = http://www.kandu.dk/spg24737.aspx

Det her kan måske hjælpe til at finde MAC-adressen:

http://bytes.com/forum/thread378234.html

VBA som henter begge:

Function ShowNics()
    Dim wmi, nics, nic, ip
    Set wmi = GetObject("winmgmts:")
    Set nics = wmi.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
    For Each nic In nics
        If Not IsNull(nic.IPAddress) Then
            For Each ip In nic.IPAddress
                MsgBox (nic.ServiceName & " " & nic.MACAddress & " " & ip)
            Next
        End If
    Next
    Set nics = Nothing
    Set wmi = Nothing
End Function

mbl ?

arne v ligger du et svar

svar

så mangler du bare at acceptere svaret