Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
用1.13日得版本,在关闭程序时也出现1楼一样的提示
在命令窗口运行下面的代码,看看会不会有问题:
If HardWareInfo.Ready = False '如果没有初始化
HardWareInfo.Initialize '初始化HardWareInfo,提取硬件信息
End If
应该不是精简版,是否AMD的原因?
运行如下代码:
If HardWareInfo.Ready = False '如果没有初始化
HardWareInfo.Initialize '初始化HardWareInfo,提取硬件信息
End If
Output.Show("CPU信息")
With HardWareInfo.CPU
Output.Show("制造商:" & .Manufacturer)
Output.Show("品名:" & .Name)
Output.Show("型号:" & .Description)
Output.Show("序列号:" & .ProcessorId)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("主板信息")
With HardWareInfo.BaseBoard
Output.Show("制造商:" & .Manufacturer)
Output.Show("型号:" & .Product)
Output.Show("序列号:" & .SerialNumber)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("硬盘信息")
With HardWareInfo.Disk
Output.Show("型号:" & .Model)
Output.Show("序列号:" & .Signature)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("BIOS信息")
With HardWareInfo.Bios
Output.Show("厂商:" & .Manufacturer)
Output.Show("序列号:" & .SerialNumber)
End With