EsbGetDatabaseInfo() gets a database's information structure, which contains non user-configurable parameters for the database.
EsbGetDatabaseInfo (hCtx, AppName, DbName, DbInfo, pItems)
ByVal hCtx As Long
ByVal AppName As String
ByVal DbName As String
DbInfo As ESB_DBINFO_T
pItems As Integer
| hCtx | Essbase VB API context handle |
| AppName | Application name |
| DbName | Database name |
| DbInfo | Buffer to receive a database info structure. |
| pItems | Number of ESB_DBREQINFO_T structures returned. |
Declare Function EsbGetDatabaseInfo Lib "ESBAPIW" (ByVal hCtx As Long, ByVal AppName As String, ByVal DbName As String, pDbInfo As ESB_DBINFO_T, Items As Integer) As LongSub ESB_GetDatabaseInfo()
Dim sts As Long
Dim AppName As String
Dim DbName As String
Dim Items As Integer
Dim n As Integer
Dim DbInfo As ESB_DBINFO_T
Dim DbReqInfo As ESB_DBREQINFO_T,
Dim Items As Integer
AppName = "Sample"
DbName = "Basic"
sts = EsbGetDatabaseInfo(hCtx, AppName, DbName, DbInfo, Items)
If sts = 0 Then
For n = 1 To Items
sts = EsbGetNextItem(hCtx, ESB_DBREQINFO_TYPE, DbReqInfo)
Next
End If
End Sub
EsbGetApplicationInfo()