以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  cpu信息怎么调用保存  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157845)

--  作者:wakai
--  发布时间:2020/10/30 15:41:00
--  cpu信息怎么调用保存
Dim dic = Computer.CreateComputer.getCPU
For Each key As String In dic.keys
    output.show(key & ":" & dic(key))
Next
dic = Computer.CreateComputer.GetVideoController
For Each key As String In dic.keys
    output.show(key & ":" & dic(key))
Next

上面这两个要怎么调用写到单元格去,下面信息可以直接调用
Tables("IP_IP").Current("设备信息")=Computer.CreateComputer.GetVersion  

Dim str = Computer.CreateComputer.GetCPU_Count
output.show(str)
str = Computer.CreateComputer.GetPhisicalMemory
output.show(str)
str = Computer.CreateComputer.GetDiskSize
output.show(str)
str = Computer.CreateComputer.GetVersion
output.show(str)


--  作者:有点蓝
--  发布时间:2020/10/30 15:51:00
--  
Dim dic = Computer.CreateComputer.getCPU
For Each key As String In dic.keys
dim r as row = Tables("IP_IP").addnew
r("xxx") = key & ":" & dic(key)
    output.show(key & ":" & dic(key))
Next

--  作者:zhenghangbo
--  发布时间:2021/3/3 20:45:00
--  
你是引用了什么dll吗?可以读取这些信息
--  作者:有点蓝
--  发布时间:2021/3/4 9:03:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=113855&skin=0