Registered: 2003-06-13
Posts: 45
Loc: Good ole U S of A
Hey guys,
I am trying to pull the fiber channel information from a server and have run into a wall. I can get all the information, however the pwwn's don't display correctly when printed. here's my code:
Code:
$servername='mysserver'
$oWbemServices = GetObject("winmgmts://$servername/root/wmi")
$enumSetAdapters = $oWbemServices.InstancesOf("MSFC_FCAdapterHBAAttributes")
$enumSetPorts = $oWbemServices.InstancesOf("MSFC_FibrePortHBAAttributes")
$nIndex = 0
For Each $oEltAdapter In $enumSetAdapters
For Each $oEltPort In $enumSetPorts
If ($oEltAdapter.InstanceName = $oEltPort.InstanceName)
" Model: " + $oEltAdapter.Model ?
" HardwareVersion: " + $oEltAdapter.HardwareVersion ?
" DriverVersion: " + $oEltAdapter.DriverVersion ?
" Status: " + $oEltAdapter.HBAStatus ?
" node_wwn: "
For Each $piece In $oEltAdapter.NodeWWN
$piece ':'
Next
? " port_wwn: "
For Each $piece In $oEltPort.Attributes.PortWWN
$piece ':'
Next
?
$nIndex = $nIndex + 1
EndIf
Next ' $oEltPort'
Next ' $oEltAdapter'
the results of the piece that I want comes out like so: port_wwn: 33:0:0:36:255:91:208:99:
which is the decimal equivalent of the hexadecimal value that I want: 21:00:00:24:ff:5b:d0:62
NTDOCNTDOC Administrator
Registered: 2000-07-28
Posts: 11624
Loc: CA
Thank you for the UDF and input. As it would appear the current version does not fully comply with UDF standards please review the suggestions and either update the UDF or let us know and we can move it to the Scripting forum until it is ready.
