Displays the contents of an alias table in the active database.
Syntax
EsbDisplayAlias (hCtx, AltName, pItems) ByVal hCtx As Long ByVal AltName As String pItems As Integer
Parameter | Description |
---|---|
hCtx | VB API context handle. |
AltName | Name of alias table. |
pItems | Address of variable to receive Items of aliases. |
Notes
Windows only: The information returned by this command can exceed the ability of Windows to allocate memory. The Windows memory limit is 64 K.
Return Value
This function returns the number of alias names in the table and generates an array of MBRALT structures accessible via EsbGetNextItem().
Access
This function requires the caller to have access to the database, and to have selected it as their active database using EsbSetActive().
Example
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
See Also