EsbDisplayAlias

アクティブ・データベース内の別名テーブルのコンテンツを表示します。

構文

            EsbDisplayAlias
             (
            hCtx, AltName, pItems
            )
ByVal 
            hCtx
                As Long
ByVal 
            AltName
             As String
      
            pItems
              As Integer
         
パラメータ説明

hCtx

VB APIコンテキスト・ハンドル。

AltName

別名テーブル名。

pItems

別名のアイテムを受け取る変数のアドレス。

備考

Windowsのみ: このコマンドで戻される情報は、Windowsのメモリー割当て機能を超過しています。Windowsのメモリー制限は64Kです。

戻り値

この関数によりテーブルの別名の数が戻され、EsbGetNextItem()でアクセスできるMBRALT構造体の配列が生成されます。

アクセス

この関数を使用するには、呼出し元がデータベースに対してアクセス権を持っていて、EsbSetActive()を使用してこれをアクティブなデータベースとして選択している必要があります。

         Declare Function EsbDisplayAlias Lib "ESBAPIN" (ByVal hCtx As Long, ByVal Name As String, Items As Integer) As Long

Sub ESB_DisplayAlias ()
   Dim pItems As Integer
   Dim Name As String
   Dim MbrAlt As ESB_MBRALT_T
   Dim sts As Long   Name = "Default"   '**************
   ' Display Alias
   '************** 
   sts = EsbDisplayAlias (hCtx, Name,
   pItems)   For n = 1 To Items     '***************************
     ' Get next Member/Alias Name 
     ' combination from the list
     '*************************** 
     sts = EsbGetNextItem (hCtx, 
     ESB_MBRALT_TYPE, MbrAlt)
   Next
End Sub
      

関連トピック