![]() | |
ConneXionFindActivitiesByCriteria Method |
Namespace: ConneXion
public ConneXionResult FindActivitiesByCriteria( Activity Activity, ref Activity[] Activities )
Dim oConneXion As New ConneXion.ConneXion Dim oResult As New ConneXion.ConneXionResult Dim oActivity As New ConneXion.Activity Dim oActivities() As ConneXion.Activity oActivity.TAMUserName = "EXEC" oActivity.TAMPassword = "PSWD" oActivity.TAMCentralAgency = "DEMOAG1" oActivity.LicenseKey = "1234567 1" oActivity.ActivityDate = "20000616" oResult = oConneXion.FindActivitiesByCriteria(oActivity, oActivities) If oResult.Success = False Then MsgBox("FindActivitiesByCriteria is False." & oResult.Description & oResult.TAMDescription) Else MsgBox("FindActivitiesByCriteria is True." & oResult.Description) End If