编程论坛's Archiver

yrt888 发表于 2008-3-13 23:45

[求助]VFP 如何获得用户帐户信息!已解决问题)

在dos下,用:net user > i:zzz.txt,就可以得到系统用户信息,请问在VFP下如何获得同样的用户信息,谢谢帮助!已解决问题)

*--枚举用户和组

LOCAL oWbemLocator, oWMIService, oItems, oItem
oWbemLocator = CREATEOBJECT("WbemScripting.SWbemLocator")
oWMIService = oWbemLocator.ConnectServer(".","root/cimv2")
oItems = oWMIService.ExecQuery("SELECT Name FROM Win32_Account")
FOR EACH oItem IN oItems
    ? oItem.Name
ENDFOR

[[it] 本帖最后由 yrt888 于 2008-3-14 09:38 编辑 [/it]]

Tiger5392 发表于 2008-3-13 23:50

Run命令

yrt888 发表于 2008-3-14 00:14

谢谢解答,我不想RUN,因为RUN,就会占用CPU的,虽然只是一两秒,当也不爽啊,请在帮助!

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.