IDatabaseGetHistoryItems Method |
Returns a collection of list items in the user's history for the given table.
These are the most recent items the current user have accessed.
Namespace:
SuperOffice.COM.SuperOfficeDB
Assembly:
SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
SyntaxIListTextItems GetHistoryItems(
SOTableId i_TableId
)
Function GetHistoryItems (
i_TableId As SOTableId
) As IListTextItems
Dim instance As IDatabase
Dim i_TableId As SOTableId
Dim returnValue As IListTextItems
returnValue = instance.GetHistoryItems(i_TableId)
IListTextItems^ GetHistoryItems(
[InAttribute] SOTableId i_TableId
)
Parameters
- i_TableId
- Type: SuperOffice.COM.SuperOfficeDBSOTableId
Return Value
Type:
IListTextItemsIListTextItems - A collection of history data items
ExamplesGets all history data items from the DocTmpl table
This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.
dim objso
dim objcl
set objso = CreateObject("superoffice.application")
If not (objSO is nothing) Then
set objcl = objso.database.gethistoryitems(130)
if objcl.empty then
msgbox "there are no items for this table"
else
msgbox "there are " & objcl.count & " historyitems in this table."
end if
else
msgbox "could not log in"
end if
set objso = nothing
See Also