EsbGetAlias

1人のユーザーについて、アクティブなデータベースからアクティブな別名テーブル名を取得します。

構文

            EsbGetAlias
             (
            hCtx, AltName, szName
            )
ByVal 
            hCtx
                As Long
ByVal 
            AltName
             As String
ByVal 
            szName
              As Integer
         

備考

別名の長さがバッファのサイズより大きい場合、名前は切り捨てられます。

戻り値

正常終了の場合は、アクティブな別名テーブルの名前がAliasNameに戻されます。

アクセス

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

例

         Declare Function EsbGetAlias Lib "ESBAPIN" (ByVal hCtx As Long, ByVal Name As String, ByVal szName As Integer) As Long

Sub ESB_GetAlias ()
   Dim sts As Long
   Const szName = 80
   Dim pName As String * szName   '**********
   ' Get Alias
   '**********
   sts = EsbGetAlias (hCtx, pName, szName)
End Sub
      

関連トピック

• EsbListAliases
• EsbSetAlias
• EsbSetActive