Visual Basic - Conexion ADO con Crystal Report 8.0

Hola Grupo:

Como puedo filtrar una cantidad de Registros de Crystal Report 8.0
de una Conexion ODBC mediante ADO

estoy utilizando este Codigo y no me funciona..

Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Dim SQL As String

db.Open "driver={INTERSOLV 3.11 32-BIT INFORMIX 9};server=mps;" & _
"uid=mpx;pwd=mpx;database=mpx"

SQL = " Select Cargo,Cargo_name from cargoes where cargo_name = " & txtcargo

rs.Open SQL, db, adOpenStatic, adLockReadOnly

Set Report = appl.OpenReport("D:\Reportes de
Produccion\Reportes\ReporteFileteResumen.rpt")

Report.Database.LogOnServer "p2sodbc.dll", "mps", "mpx", "mpx", "mpx"
Report.Database.SetDataSource rs

CRViewer1.ReportSource = Report
CRViewer1.ViewReport

El problema se presenta es que no me filtras los datos solo me muestra los
registros del SQL que tengo en el Reporte..

agradecido por vuestra ayuda..

Marcos C