ICriteriaNewCriterion Method |
Create a new criterion for a regular field. TableAndFieldName parameter is on the format 'tablename.fieldname'
Creates a new SOCriterion object
Namespace:
SuperOffice.COM.SuperOfficeDB
Assembly:
SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
SyntaxSOCriterion NewCriterion(
string TableAndFieldName,
EnCriterionOperator Oper
)
Function NewCriterion (
TableAndFieldName As String,
Oper As EnCriterionOperator
) As SOCriterion
Dim instance As ICriteria
Dim TableAndFieldName As String
Dim Oper As EnCriterionOperator
Dim returnValue As SOCriterion
returnValue = instance.NewCriterion(TableAndFieldName,
Oper)
SOCriterion^ NewCriterion(
[InAttribute] String^ TableAndFieldName,
[InAttribute] EnCriterionOperator Oper
)
Parameters
- TableAndFieldName
- Type: SystemString
The name of the table and field the criterion you want to get searches in ("tablename.fieldname") - Oper
- Type: SuperOffice.COM.SuperOfficeDBEnCriterionOperator
Return Value
Type:
SOCriterionSOCriterion
ExamplesNewCriterion
Dim db As New Database
If db.Login("<username>", "<password>") Then
Dim selection As SOSelection = db.GetSelection(26)
Dim criterion As SOCriterion = selection.Criteria.NewCriterion("contact.name", EnCriterionOperator.enBeginsWith)
criterion.Values.AddString("super")
selection.Criteria.Add(criterion)
Dim nextCriterion As SOCriterion = selection.Criteria.NewCriterion("contact.updated", EnCriterionOperator.enDateIsEqual)
Dim myDate As New Date(2005, 8, 24)
nextCriterion.Values.AddDate(myDate)
selection.Criteria.Add(nextCriterion)
selection.Save()
MsgBox("criterion added")
Else
MsgBox("failed to log in")
End If
See Also