CasewareDocs

HistoryCount

Retrieves a history count for a database.

Compatibility

Available as of IDEA version 9.0

Syntax

HistoryCount(databaseName as String)

Parameter

databaseName

The name or the path of an IDEA database.

Remarks

An error is raised if databaseName cannot be found or if the parameter is space or null.

Example

Dim ProtectIP As Object 
Dim fileName As String

Sub Main

'Get the name of the database.
fileName = SmartContext.PrimaryInputFile

'Initialization
Set ProtectIP = SmartContext.MacroCommands.ProtectIP

'Read current history count for a database
MsgBox "Number of history entries " & ProtectIP.HistoryCount (fileName)

'Release objects.
Set ProtectIP = Nothing
End Sub