List all PCI cards

[ricky]

Hello,

how can I list all PCI card with the version and date of its card? I try to search, but nothing found...

Thanks in adavnce

[Zedna]

I think this type of information could be get by WMI.

Look at this computer info UDF for the example:

EDIT:

WMI Classes

http://msdn.microsoft.com/en-us/library/windows/desktop/aa394554%28v=vs.85%29.aspx

Win32 Classes

http://msdn.microsoft.com/en-us/library/windows/desktop/aa394084%28v=vs.85%29.aspx

Motherboard, Controller, and Port Classes

http://msdn.microsoft.com/en-us/library/..._motherboard_controller_and_po

Edited May 18, 2012 by Zedna

[Zedna]

Here is little snippet, maybe it's close to original question:

$objWMIService = ObjGet("winmgmts:localhostrootCIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_PnPEntity WHERE DeviceID LIKE 'PCI%'", "WQL", 48)
For $objItem In $colItems
    ConsoleWrite($objItem.Name & @CR)
    ConsoleWrite($objItem.DeviceID & @CR)
    ConsoleWrite(@CR)
Next

[ricky]

Thanks Zedna, and it is possible to have the information of which driver is installed for a specific card?

[water]

A good place to start working with WMI is

It shows all kind of available properties and creates AutoIt code for you.

[ricky]

Hello,

thanks water, I know scriptomatic, If i ask in the forum it's because I don't find my solution.

Before the answer of zedna I already test the Win32_PnPEntity, but my goal of the script is to have the drivers version and date, but I didn't find this information in the WMI libraries!

[BrewManNH]

I used the AIScriptomatic tool and came up with this script from it.

expandcollapse popup

; Generated by AutoIt Scriptomatic May 22, 2012

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

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

If IsObj($colItems) then
   For $objItem In $colItems
      $Output &= "Caption: " & $objItem.Caption & @CRLF
      $Output &= "ClassGuid: " & $objItem.ClassGuid & @CRLF
      $Output &= "CompatID: " & $objItem.CompatID & @CRLF
      $Output &= "CreationClassName: " & $objItem.CreationClassName & @CRLF
      $Output &= "Description: " & $objItem.Description & @CRLF
      $Output &= "DeviceClass: " & $objItem.DeviceClass & @CRLF
      $Output &= "DeviceID: " & $objItem.DeviceID & @CRLF
      $Output &= "DeviceName: " & $objItem.DeviceName & @CRLF
      $Output &= "DevLoader: " & $objItem.DevLoader & @CRLF
      $Output &= "DriverDate: " & WMIDateStringToDate($objItem.DriverDate) & @CRLF
      $Output &= "DriverName: " & $objItem.DriverName & @CRLF
      $Output &= "DriverProviderName: " & $objItem.DriverProviderName & @CRLF
      $Output &= "DriverVersion: " & $objItem.DriverVersion & @CRLF
      $Output &= "FriendlyName: " & $objItem.FriendlyName & @CRLF
      $Output &= "HardWareID: " & $objItem.HardWareID & @CRLF
      $Output &= "InfName: " & $objItem.InfName & @CRLF
      $Output &= "InstallDate: " & WMIDateStringToDate($objItem.InstallDate) & @CRLF
      $Output &= "IsSigned: " & $objItem.IsSigned & @CRLF
      $Output &= "Location: " & $objItem.Location & @CRLF
      $Output &= "Manufacturer: " & $objItem.Manufacturer & @CRLF
      $Output &= "Name: " & $objItem.Name & @CRLF
      $Output &= "PDO: " & $objItem.PDO & @CRLF
      $Output &= "Signer: " & $objItem.Signer & @CRLF
      $Output &= "Started: " & $objItem.Started & @CRLF
      $Output &= "StartMode: " & $objItem.StartMode & @CRLF
      $Output &= "Status: " & $objItem.Status & @CRLF
      $Output &= "SystemCreationClassName: " & $objItem.SystemCreationClassName & @CRLF
      $Output &= "SystemName: " & $objItem.SystemName & @CRLF
   Next
   ConsoleWrite($Output)
   FileWrite(@TempDir & "Win32_PnPSignedDriver.TXT", $Output )
   Run(@Comspec & " /c start " & @TempDir & "Win32_PnPSignedDriver.TXT" )
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_PnPSignedDriver" )
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

Perhaps using a script to find the devices you're looking for, filtering what this provides by the DeviceName property, you can find the .DriverVersion and the .DriverDate.

[ricky]

Thanks, after my post I found also the pnp signed driver. I'm currently testing it.