Foxtable(狐表)用户栏目专家坐堂 → cpu信息怎么调用保存


  共有2721人关注过本帖树形打印复制链接

主题:cpu信息怎么调用保存

帅哥哟,离线,有人找我吗?
wakai
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:360 积分:3416 威望:0 精华:0 注册:2016/5/25 21:31:00
cpu信息怎么调用保存  发帖心情 Post By:2020/10/30 15:41:00 [只看该作者]

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)


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:451 积分:4286 威望:0 精华:0 注册:2018/2/7 14:30:00
  发帖心情 Post By:2021/3/3 20:45:00 [只看该作者]

你是引用了什么dll吗?可以读取这些信息

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/4 9:03:00 [只看该作者]


 回到顶部