IListTextItemsEmpty Property |
Namespace: SuperOffice.COM.SuperOfficeDB
Get history items for the DocTmpl table
This text may be copied to the notepad, and saved as a *.vbs file. You need a running CRM win client to make it work. (This example uses the SuperOffice COM application library and not the SuperOffice db library interface).
dim i 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 for i = 0 to objcl.count - 1 set objcli = objcl.item(i) msgbox objcli.text next end if else msgbox "could not log in" end if set objso = nothing