Promotic
WikipediaLinkedInYoutubeTwitterFacebook

GetUserInfo - metoda objektu Pm

Popis:
Získaní informací ze systému uživatelů.
Syntaxe:
GetUserInfo(sParams As String) As Variant
Volání:
users = Pm.GetUserInfo("what:cfguserlist;")
Parametry:
sParams(String) Textový seznam dodatečných parametrů určující, jaké informace získat. Údaje s přiřazenou hodnotou jsou zde odděleny středníkem, například "what:cfguserlist;type:local;".
"what:sss;" - Základní volba určující, co bude vráceno.
what:cfguserlist; - Seznam identifikátorů uživatelů (oddělený čárkou ',').
what:cfggrouplist; - Seznam identifikátorů skupin (oddělený čárkou ',').
what:loguserarray; - Pole referencí na přihlášené uživatele (objekty User). Počet vrácených přihlášených uživatelů se dá zjistit pomocí funkce UBound.
"type:sss;" (nepovinné) - Určuje, zda vracet všechny uživatele nebo jenom lokální nebo jenom síťové uživatele. Pokud není volba uvedena, znamená to všechny uživatele (lokální i síťové).
type:local; - Pouze lokální uživatelé.
type:net; - Pouze síťoví uživatelé.
Poznámka:
Tato metoda prozatím není funkční pro Web Obrazy.
Příklad1:
Získání seznamu všech lokálních uživatelů. Nejprve v podobě seznamu identifikátorů uživatelů oddělených čárkou (',') s následným převedením seznamu na pole jednotlivých identifikátorů.
Dim sUsers, aUsers
sUsers = Pm.GetUserInfo("what:cfguserlist;type:local;")
aUsers = Split(sUsers, ","))
Příklad2:
Získání pole referencí na všechny přihlášené síťové uživatele (objekty User) s následným výpisem identifikátoru každého přihlášeného uživatele do INFO systému.
Dim a,n,i
a = Pm.GetUserInfo("what:loguserarray;type:net;")
n = UBound(a)
For i=0 To n
  Pm.Debug a(i).Id
Next
nebo
Dim a,u
a = Pm.GetUserInfo("what:loguserarray;type:net;")
For Each u In a
  Pm.Debug u.Id
Next
Navigace:
 
- Pm
 
- Abs
- Cos
- E
- Exp
- GetUserInfo
 
 
- LN2
- PI
- Pow
- Sin
- Tan
© MICROSYS, spol. s r. o.Tavičská 845/21 703 00 Ostrava-Vítkovice