グループのメンバーであるユーザーのリスト(またはユーザーが属するグループのリスト)を取得します。
構文
EsbGetGroupList
(
hCtx, GrpName, pItems
)
ByVal
hCtx
As Long
ByVal
GrpName
As String
pItems
As Integer
| パラメータ | 説明 |
|---|---|
hCtx |
VB APIコンテキスト・ハンドル。 |
GrpName |
グループまたはユーザー名。 |
pItems |
ユーザー名のアイテムを受け取る変数のアドレス。 |
備考
この関数を使用すると、ユーザー名をGroupName引数として使用することによって、ユーザーが属するグループのリストを取得することもできます。
戻り値
正常終了の場合、ユーザー名のアイテムがpItemsに戻され、EsbGetNextItem()を介してアクセス可能なユーザー名の文字列の配列が生成されます。
アクセス
この関数を使用するには、ユーザーが独自のグループ・リストを取得していないかぎり、ログインしたサーバーに対して呼出し元がユーザーの作成/削除権限(ESB_PRIV_USERCREATE)を持っている必要があります。
例
Declare Function EsbGetGroupList Lib "ESBAPIN" (ByVal hCtx As Long, ByVal GroupName As String, Items As Integer) As Long
Sub ESB_GetGroupList ()
Dim Items As Integer
Dim Group As String
Dim GroupName As String * ESB_USERNAMELEN
Dim sts As Long Group = "User Group" '***************
' Get Group List
'***************
sts = EsbGetGroupList (hCtx, Group, Items) For n = 1 To Items '**************************
' Get next User Name String
' from the list
'**************************
sts = EsbGetNextItem (hCtx,
ESB_GROUPNAME_TYPE, ByVal GroupName)
Next
End Sub
関連トピック