If managing Active Directory using Windows Powershell® is making you feel like you stepped back in time, you are not alone. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why.
Msgbox GetComputerNameFromIP("10.10.10.1") Function GetComputerNameFromIP(sComputer) Set oWMI = GetObject("winmgmts:\\.\root\cimv2") Set cPings = oWMI.ExecQuery("SELECT * FROM Win32_PingStatus " &_ "WHERE Address = '" & sComputer & "' AND Timeout = 1000 AND ResolveAddressNames = TRUE AND RecordRoute = 1") For Each oPing In cPings GetComputerNameFromIP = oPing.ProtocolAddressResolved Next Set cPings = Nothing Set oWMI = Nothing End Function
Join the community of 500,000 technology professionals and ask your questions.