以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]内存硬件读取的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=143090)
--  作者：81538475
--  发布时间：2019/11/13 12:52:00
--  [求助]内存硬件读取的问题
想问下，现在读取硬件的方法有哪几种，目前我用下面的方式读取内存的类型，很多机器都读取不出来。
  Dim cmicWmi3 As New System.Management.ManagementObjectSearcher("Se\\ect * From Win32_PhysicalMemory")
    Dim strn3 As String
    
    Dim Caption1 As String \'数字ID
    Dim Manufacturer As String
    
    Dim speed As String
    \'Dim SMBIOSMemoryType As String \'这个我们暂且称其为序列号码
    For Each cmicWmiObj As System.Management.ManagementObject In cmicWmi3.Get
        Dim MemoryType As String
        Caption1 = cmicWmiObj("Capacity") & "  " 
        Manufacturer = cmicWmiObj("Manufacturer") & "  " 
 
 try
            MemoryType = cmicWmiObj("SMBIOSMemoryType") & "  "
        Catch ex As Exception
            
                MemoryType = cmicWmiObj("MemoryType") & "  "
            
        End Try
        speed= cmicWmiObj("speed") & "  "

next

另外就是如何读取显示器厂商
[此贴子已经被作者于2019/11/13 12:57:33编辑过]
--  作者：有点蓝
--  发布时间：2019/11/13 14:00:00
--  
这个和系统安装的硬件驱动有关，也硬件本身也有关系，取不到就取不到，我也没有办法。

显示器属性参考：https://docs.microsoft.com/zh-cn/windows/win32/cimwin32prov/win32-desktopmonitor?redirectedfrom=MSDN
--  作者：81538475
--  发布时间：2019/11/13 14:02:00
--  
恩。就是不知道鲁大师是如何取到的。不知道是不是有其他思路。比如注册表读取之类的