EsbGetDatabaseState

ユーザーが構成可能なデータベースのパラメータが含まれている、データベースの状態構造体を取得します。

構文

            EsbGetDatabaseState
             (
            hCtx, AppName, DbName, pDbState
            )
ByVal 
            hCtx
                 As Long
ByVal 
            AppName
              As String
ByVal 
            DbName
               As String
      
            pDbState
             As ESB_DBSTATE_T

パラメータ	説明
hCtx	VB APIコンテキスト・ハンドル。
AppName	アプリケーション名。
DbName	データベース名。
pDbState	データベースの状態構造体を受け取るバッファ。

備考

この関数は、サーバー・データベースの状態構造体のみを取得します。

戻り値

正常終了の場合、データベースの状態構造体へのポインタがpDbStateに戻されます。

アクセス

データベースの状態構造体を取得するには、接続しているユーザーはデータベースに対して少なくとも読取りアクセス権(ESB_PRIV_READ)を持っている必要があります。

例

         Declare Function EsbGetDatabaseState Lib "ESBAPIN" (ByVal hCtx As Long, ByVal AppName As String, ByVal DbName As String, pDbState As ESB_DBSTATE_T) As Long 

Sub ESB_GetDatabaseState()
   Dim sts As Long
   Dim AppName As String
   Dim DbName As String
   Dim DbState As ESB_DBSTATE_T   AppName = "Sample"
   DbName = "Basic"   '******************************** 
   '****** Get Database State ******
   '********************************
   sts = EsbGetDatabaseState(hCtx, AppName, DbName,
   DbState)
End Sub