some keyboard information

some keyboard information

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Add

x = 1
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set objApps = objWMIService.ExecQuery("Select * from Win32_Keyboard")

objExcel.Cells(1

Related posts:

1. processor information in an excel table Learn more about processor information in an excel table by...
2. network client information Learn more about network client information by visiting our website....
3. list disk drive information in an excel spreadsheet Learn more about list disk drive information in an excel...
4. display information about shares on your computer Learn more about display information about shares on your computer...
5. Operating System displayed in an excel tableOperating System displayed in an excel table Learn more about Operating System displayed in an excel tableOperating...

Related posts brought to you by Yet Another Related Posts Plugin.

This entry was posted on Monday, May 4th, 2009 at 8:41 pm and is filed under VBScript. You can follow any responses to this entry through the RSS 2.0 feed. Responses are currently closed, but you can trackback from your own site.