Jak znaleźć nazwę komputera przez ip w sieci LAN? Znam adres IP danego komputera, ale jak uzyskać nazwę jego grupy roboczej?
źródło
Jak znaleźć nazwę komputera przez ip w sieci LAN? Znam adres IP danego komputera, ale jak uzyskać nazwę jego grupy roboczej?
Znajdź poniższą funkcję, która uzyska zarówno adres IP, jak i nazwę komputera. Zmień zakres dla adresu IP.
Pinguje każdy adres IP i sprawdza odpowiedź.
Public Function mCheckThroughWMIQuery() As String
Dim oWMI = GetObject("winmgmts:")
Dim IP = GetObject("winmgmts:")
Dim oPings = GetObject("winmgmts:")
Dim PcName = GetObject("winmgmts:")
Dim sResult As String = ""
For i = 70 To 100
IP = "192.168.1." + i.ToString
oPings = oWMI.ExecQuery("Select * from WIN32_Pingstatus where address='" + IP + "'" + " and ResponseTime > 0")
For Each oPing In oPings
Try
PcName = System.Net.Dns.GetHostEntry(IP)
sResult &= IP & Chr(9) & PcName.HostName & vbNewLine
Catch ex As Exception
sResult &= IP & vbNewLine
End Try
Next
Next
Return sResult
End Function
Spróbuj użyć polecenia nbtstat -a [ip address]w wierszu polecenia:
win+rnastępnie wpisz, cmda następnie naciśnij enter.
Powinno to wyświetlić tabelę nazw. Nazwa powiązana z typem „Unikatowy” to nazwa komputera. Nazwa powiązana z typem „Grupa” powinna być grupą roboczą, do której przyłączony jest komputer.
Odpowiedzią na zlew kuchenny jest po prostu uruchomienie nmap przeciwko IP.
Dzięki temu uzyskasz prawie wszystkie informacje, które można uzyskać podczas sondowania interfejsu sieciowego komputera.
Chociaż jest tu trochę przesada, nmap (wraz z GUI - zenmap) są niezwykle przydatne same w sobie.