Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

IRQ Assignments 1

Status
Not open for further replies.

TheAceMan1

Programmer
Sep 23, 2003
11,174
US
Howdy All

How can I get a list of IRQ assignments without parsing thru Device Manager?

[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see faq219-2884 [blue]Worthy Reading![/blue] [thumbsup2]
Also faq181-2886 [blue]Worthy Reading![/blue] [thumbsup2]
 
My thought would be to check system information. Go to all programs,accessories,system tools, and system information. Choose hardware, and then IRQ, it will list them all out for you.
 
How are ya rclarke250 . . .

Many thanks. I knew it was under my fingertips somewhere ... just never logged it!

My next question will be a doosey ...

See Ya! . . . . . .

Be sure to see faq219-2884 [blue]Worthy Reading![/blue] [thumbsup2]
Also faq181-2886 [blue]Worthy Reading![/blue] [thumbsup2]
 
Well I guess ... Here's a VBscript WMI solution I've just knocked together:
Code:
[blue]    Dim objLocator, objService, colMemory, Memory, colPNP, PNP,  colIRQ, IRQ
    Set objLocator = CreateObject("WbemScripting.SWbemLocator")
    Set objService = objLocator.ConnectServer(".", "root\cimv2")

    Set colMemory = objService.ExecQuery("Select * from Win32_DeviceMemoryAddress")
    For Each Memory In colMemory
        Set colPNP = objService.ExecQuery("ASSOCIATORS OF {Win32_DeviceMemoryAddress.StartingAddress='" + Memory.StartingAddress + "'} WHERE RESULTCLASS  = Win32_PnPEntity")
        For Each pnp In colPNP
            Set colIRQ = objService.ExecQuery("ASSOCIATORS OF {Win32_PnPEntity.DeviceID='" + pnp.PNPDeviceID + "'} WHERE RESULTCLASS  = Win32_IRQResource")
            For Each IRQ In colIRQ
                result = "IRQ " & IRQ.irqNumber & Chr(9) & pnp.Caption
            Next
            If result <> "" Then wscript.echo  result
            result = ""
        Next
    Next[/blue]
 
How are ya strongm . . .

So sorry. [blue]I didn't intend to send you thru all that code.[/blue] MSInfo32 was quite sufficient. In fact DeviceManager-View-Resources by type-Interrupt request (IRQ) use to be a good spot for me. Just hav'nt had the need in awhile.

I tried the code anyway and there were problems identifying [blue]result[/blue] & [blue]wscript[/blue].



See Ya! . . . . . .

Be sure to see faq219-2884 [blue]Worthy Reading![/blue] [thumbsup2]
Also faq181-2886 [blue]Worthy Reading![/blue] [thumbsup2]
 
Ah, I'm guessing you tried running it in a VBA environment, then. But it's a VBscript solution ...
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top