EsbLogoutUser

管理者またはアプリケーション・マネージャが他のユーザーをEssbaseサーバーから切断できるようにします。

構文

            EsbLogoutUser
             (
            hCtx, LoginId
            )
ByVal 
            hCtx
                As Long
ByVal 
            LoginId
             As Long

パラメータ	説明
hCtx	ログアウトを強制するユーザーのVB APIコンテキスト・ハンドル。
LoginId	ログアウトされるユーザーのログインID。

備考

LoginIdは、EsbListConnections()関数によって戻されるユーザー情報構造体から取得できます。
この関数は指定されたLoginIDが示すログインのみをログアウトさせます。その他のログインまたはコンテキストは影響を受けません。
管理者は、hCtxにログインしたサーバーにログインしたユーザーをログアウトできます。アプリケーション・マネージャは、hCtxをアプリケーション・マネージャとしてアプリケーションに接続しているユーザーのみをログアウトできます。
自分自身はログアウトできません。

戻り値

なし。

アクセス

この関数を呼び出すには、管理者またはアプリケーション・マネージャ権限を持っている必要があります。

例

         Declare Function EsbLogoutUser Lib "ESBAPIN" (ByVal hCtx As Long, ByVal LoginId As Long) As Long

Sub ESB_LogoutUser()
   Dim Items As Integer
   Dim UserInfo As ESB_USERINFO_T
   Dim sts As Long
   '*****************
   ' List Connections
   '***************** 
   sts = EsbListConnections(hCtx, Items)
   '*****************
   ' Log out all users
   '***************** 
   For n = 1 To Items
     '*****************************
     ' Get next User Info structure
     ' from the list
     '*****************************
     sts = EsbGetNextItem(hCtx, ESB_USERINFO_TYPE, UserInfo)
     sts = EsbLogoutUser(hCtx, UserInfo.LoginId)
   Next
End Sub