EsbListObjects

Lists all objects of the specified types on the server or locally on the client.

Syntax

EsbListObjects (hCtx, ObjType, AppName, DbName, pItems)
ByVal hCtx    As Long
ByVal ObjType As Long
ByVal AppName As String
ByVal DbName  As String
      pItems  As Integer
ParameterDescription

hCtx

VB API context handle. Can be local context handle returned from EsbCreateLocalContext().

ObjType

Object type (may be multiple types). Refer to "Bitmask Types" for a list of possible values.

AppName

Application name.

DbName

Database name. If an empty string, lists objects in the application sub-directory.

pItems

Address of variable to receive the Items of objects of the appropriate type(s).

Return Value

If successful, returns a Items of the number of objects of the appropriate type(s) in pItems, and generates an array of matching object structures accessible via EsbGetNextItem().

Access

This function requires no special privileges; note however that server objects will only be listed if the caller has the appropriate level of access to the application and/or database (depending on the object type).

Example

Declare Function EsbListObjects Lib "ESBAPIN" (ByVal hCtx As Long, ByVal ObjType As Integer, ByVal AppName As String, ByVal DbName As String, Items As Integer) As Long

Sub ESB_ListObjects ()
   Dim Items As Integer
   Dim AppName As String
   Dim DbName As String
   Dim ObjType As Integer
   Dim ObjInfo As ESB_OBJINFO_T
   Dim sts As Long   Appname = "Sample"
   DbName = "Basic"
   ObjType = ESB_OBJTYPE_OUTLINE   '*********************
   ' List Outline Objects
   '********************* 
   sts = EsbListObjects (hCtx, ObjType, 
         AppName, DbName, Items)   For n = 1 To Items     '**************************
     ' Get next Object Structure 
     ' from the list
     '**************************
     sts = EsbGetNextItem (hCtx, 
           ESB_OBJINFO_TYPE, ObjInfo)
   Next
End Sub

See Also