EsbSetDatabaseNote() sets a database's note-of-the-day message. This message may be used to display useful information about the database (whether data has been loaded, when it was last calculated, etc.) to users before they connect to the database.
EsbSetDatabaseNote (hCtx, AppName, DbName, DbNote)
ByVal hCtx As Long ByVal AppName As String ByVal DbName As String ByVal DbNote As String
| hCtx | Essbase VB API context handle. |
| AppName | Application name. |
| DbName | Database name. |
| DbNote | Pointer to a database note string. |
Declare Function EsbSetDatabaseNote Lib "ESBAPIW" (ByVal hCtx As Long, ByVal AppName As String, ByVal DbName As String, ByVal DbNote As String) As Long
Sub ESB_SetDatabaseNote ()
Dim sts As Long
Dim AppName As String
Dim DbName As String
Dim DbNote As String
AppName = "Sample"
DbName = "Basic"
DbNote = "This is a test"
'******************
' Set Database note
'******************
sts = EsbSetDatabaseNote (hCtx, AppName,
DbName, DbNote)
End Sub
EsbGetDatabaseNote()