主题:请教如何用VFP获取电脑所在工作组名称
ihorse
[专家分:970] 发布于 2009-02-27 06:10:00
现在需要将机器名和工作组名显示在表单中,前者很简单,课时,如何获取到工作组名称呢?希望得到老师指教,不胜感谢!
回复列表 (共3个回复)
沙发
ihorse [专家分:970] 发布于 2009-02-27 06:14:00
搜索了一下,在VFP中可以用以下代码调用Wmi来实现对工作组名称的更改:
objNetwork=Createobject("WScript.Network")
strComputer=objNetwork.ComputerName
objComputer=GetObject("winmgmts:{impersonationLevel=Impersonate}!\\&strComputer.\root\cimv2:Win32_ComputerSystem.Name='&strComputer.'")
nWorkGroup = objComputer.JoinDomainOrWorkGroup("新工作组名称",Null,Null,Null,Null)
--以上将把工作组名称更改为“新工作组名称”,你换为其他也可以。
但以上代码只能修改,不知道该如何显示呢?貌似有
JoinDomainOrWorkGroup()这个函数,可惜没查找到相关使用资料,诚盼老师指教!!
板凳
ihorse [专家分:970] 发布于 2009-03-14 15:33:00
贴出了半个月,居然没有得到答案,唉!老师们不要吝啬自己的答案啊!谢谢哦!
3 楼
ihorse [专家分:970] 发布于 2009-03-21 18:20:00
我只得在将近一个月之际再次顶一下本帖,以免沉底!
我来回复