Is it possible to pass the values of global variables from user input on a vb form into the SQL query of a Crystal Report form. I am trying to get the user to fill out the necessary information for a report and then have the report done in Crystal reports with in my VB application. Thanks.

Private Sub ImprimerRapport(sNomRap As String, PrintMode As Long)
Dim crxApplication As New CRAXDRT.Application
Dim m_Report As CRAXDRT.Report
Dim crxParameterField As CRAXDRT.ParameterFieldDefinition
Dim x As Long
Dim sChemin As String
Dim iIDProbleme As Long
Dim sSQL As String
Dim itmx As ListItem

If Me.ListViewProblemes.ListItems.Count > 0 Then

iIDProbleme = Me.ListViewProblemes.SelectedItem.Tag

sChemin = App.Path & "\" + sNomRap

Set m_Report = crxApplication.OpenReport(sChemin, 1)
If m_Report.ParameterFields.Count > 0 Then
For x = 1 To m_Report.ParameterFields.Count
Select Case UCase(m_Report.ParameterFields(x).ParameterFieldName)
Case "IDPROBLEME"
Set crxParameterField = m_Report.ParameterFields.Item(x)
crxParameterField.AddCurrentValue iIDProbleme
End Select
Next x
End If
If PrintMode = 2 Then
For Each itmx In Me.ListViewProblemes.ListItems
If Len(sSQL) > 0 Then
sSQL = sSQL + ", " & itmx.Tag
Else
sSQL = itmx.Tag
End If
Next itmx

m_Report.RecordSelectionFormula = " {ado.ID_Probleme} IN [" & sSQL & "] "
Else
m_Report.RecordSelectionFormula = " {ado.ID_Probleme} = " & iIDProbleme
End If

m_Report.PrintOut
Else
MsgBox "Rien a imprimer..." + vbCr + vbCr + "Nothing to print...", vbExclamation + vbOKOnly
End If

End Sub

vb crystal