![]() | |
ConneXionFindClaimsByCriteria Method |
Namespace: ConneXion
MaxCount: This field limits the number of records returned when calling FindClaimsByCriteria to avoid time out issues. Once MaxCount is set, additional code can be added to see if there are additional records to be returned and loop thru those records..
Dim oConneXion As New ConneXion.ConneXion Dim oResult As New ConneXion.ConneXionResult Dim oClaim As New ConneXion.Claim Dim oClaims() As ConneXion.Claim oClaim.TAMUsername = "EXEC" oClaim.TAMPassword = "PSWD" oClaim.IssuingCompany = "PRO" oClaim.MaxCount = 20 oResult = oConneXion.FindClaimsByCriteria(oClaim, oClaims) If oResult.Success Then txtResult.Text = oResult.Description dgrdResult.DataSource = oClaims Else txtResult.Text = "Number: " & oResult.Number & vbCrLf & "Desc: " & oResult.Description & vbCrLf & "TAMErrorNumber: " & oResult.TAMErrorNumber & vbCrLf & "TAMErroDesc: " & oResult.TAMDescription End If