EsbGetObjectInfo

サーバー上またはローカルのクライアント上にある特定のオブジェクトに関する情報を取得します。

構文

            EsbGetObjectInfo
             (
            hCtx, ObjType, AppName, DbName, ObjName, ObjInfo
            )
ByVal 
            hCtx
                As Long
ByVal 
            ObjType
             As Long
ByVal 
            AppName
             As String
ByVal 
            DbName
              As String
ByVal 
            objName
             As String
      
            ObjInfo
             As ESB_OBJINFO_T

パラメータ	説明
hCtx	VB APIコンテキスト・ハンドル。EsbCreateLocalContext()によって戻されたローカル・コンテキスト・ハンドルの場合もあります。
ObjType	オブジェクト・タイプ(単一のタイプのみ)。使用可能な値のリストはビットマスク・データ型を参照してください。
AppName	アプリケーション名。
DbName	データベース名。空の文字列の場合は、アプリケーションのサブディレクトリが使用されます。
ObjName	オブジェクト名。
ObjInfo	オブジェクトの情報構造体を受け取るバッファ。

戻り値

正常終了の場合、該当するオブジェクトに関する情報を含むオブジェクト構造体がpObjectに戻されます。

アクセス

この関数を使用するには、オブジェクトが含まれている指定されたアプリケーションまたはデータベース(あるいはその両方)に対して、呼出し元が(オブジェクト・タイプに応じて)適切なレベルのアクセス権を持っている必要があります。

例

         Declare Function EsbGetObjectInfo Lib "ESBAPIN" (ByVal hCtx As Long, ByVal ObjType As Integer, ByVal AppName As String, ByVal DbName As String, ByVal ObjName As String, ObjInfo As ESB_OBJINFO_T) As Long

Sub ESB_GetObjectInfo ()
   Dim sts As Long
   Dim AppName As String
   Dim DbName As String
   Dim ObjName As String
   Dim ObjType As Integer
   Dim Object As ESB_OBJINFO_T   AppName = "Sample"
   DbName = "Basic"
   ObjName = "Basic"
   ObjType = ESB_OBJTYPE_OUTLINE   '**************************
   ' Get Object info structure
   '**************************
   sts = EsbGetObjectInfo (hCtx, ObjType, AppName,
         DbName, ObjName, Object) 
End Sub