here is the vb code I use to pass to CR
sCriteria = ""
For i = 0 To gResults.ListCount - 1
If gResults.Selected(i) Then
sCriteria = sCriteria & "({@fSSN}) = '" & Left(gResults.List(i), 10) & "' or "
End If
Next
sCriteria = Left(sCriteria, Len(sCriteria) - 4)
Debug.Print sCriteria
CrystalControl.ReportFileName = "emp_prof.rpt"
CrystalControl.SelectionFormula = sCriteria
my formula is denoted as @fSSN and just contains
{T_Emp_Basic_Info.SSNO} when you edit the formula
I am new with CR so while I was tinkering this is how I got it to work. Would appreciate any suggestions??!?!?! or help!!!! Thanks