IAdminCreateStatusMonitor Method |
Create a new status monitor for a given table. (Only Contact and Project are supported).
Read more about status monitors on Techdoc
Namespace:
SuperOffice.COM.SuperOfficeDB
Assembly:
SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
SyntaxSOStatusMonitor CreateStatusMonitor(
SOTableId TableId
)
Function CreateStatusMonitor (
TableId As SOTableId
) As SOStatusMonitor
Dim instance As IAdmin
Dim TableId As SOTableId
Dim returnValue As SOStatusMonitor
returnValue = instance.CreateStatusMonitor(TableId)
SOStatusMonitor^ CreateStatusMonitor(
[InAttribute] SOTableId TableId
)
Parameters
- TableId
- Type: SuperOffice.COM.SuperOfficeDBSOTableId
Return Value
Type:
SOStatusMonitorSOStatusMonitor
ExamplesCreate Status Monitor
Dim soDB, myStatusMon, myCriterion
Set soDB = CreateObject("SuperOfficeDB.Database")
enTableCont = 5
If not (soDB is nothing) Then
soDB.Login "USERNAME", "PASSWORD"
Set myStatusMon = soDB.Admin.CreateStatusMonitor(enTableCont)
myStatusMon.Name = "Super"
myStatusMon.Description = "All contacts that starts with Super"
myStatusMon.Save
Set myCriterion = myStatusMon.Criteria.NewCriterion("contact.name", enBeginsWith)
myCriterion.Values.AddString "Super"
myStatusMon.Criteria.Add myCriterion
myStatusMon.Save
else
MsgBox "Unable to connect to database"
end if
Set objSO = Nothing
See Also