Sign in to follow this  
Followers 0
Krol

Really get remote pc MAC?

3 posts in this topic

How get remote pc mac and networkname?

Share this post


Link to post
Share on other sites



@Krol

This for the MAC address

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"

$Output=""
$Output = $Output & "Computer: " & $strComputer  & @CRLF
$Output = $Output & "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   For $objItem In $colItems
      
      $Output = $Output & "MACAddress: " & $objItem.MACAddress & @CRLF
      
    ;  if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
        ConsoleWrite($Output)
        ConsoleWrite(@CR&@CR)
      ;$Output=""
   Next
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_NetworkAdapterConfiguration" )
Endif


Func WMIDateStringToDate($dtmDate)

    Return (StringMid($dtmDate, 5, 2) & "/" & _
    StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
    & " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc

For the network name there have been multiple scripts puvlished in the Example Scripts section.

Please use the SEARCH and you'll find it.

regards

ptrex

Share this post


Link to post
Share on other sites

Okay, so the Mac address macro is uber - I'm so bookmarking this one.

Awsome work.

Jim

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0