Pasar parámetros desde VB a una consulta en Access 2003

[buji]

Hola Foro.

Tengo una consulta en Access 2003 la cual recibe como parámetro un código (por ejemplo código de cliente) para filtrar y mostrar los datos.

Es posible llamar a esta consulta y pasar el parámetro desde código visual basic?

Yo estoy haciendo lo siguiente:

Set Rs = New Recordset
aRs.Open "consulta", miconexion, adOpenStatic, adLockOptimistic

Ahora, no se como pasarle a la consulta el valor del parámetro?

Desde ya muchas gracias!

[-rommel_]

dim strConsulta as string
strConsulta = "Select * from Table where campo1 = '" & me.textBox1.text & "'"
aRs.Open strConsulta, miconexion, adOpenStatic, adLockOptimistic

asiiii!!!

[buji]

Romel, gracias por tu respuesta.

Pero lo que estoy tratando es de llamar desde mi código VB a las consultas que tengo almacenadas en mi BDD ACCESS 2003.

La idea seria trabajar de forma similar a los StoreProcedure de SQL Server (si si, ya se que son cosas distintas).

Pero bueno, encontre esto:

cmd2.ActiveConnection = miconexion
cmd2.CommandText = "miconsultaenaccess"
cmd2.CommandType = adCmdStoredProc
Set aRs = cmd2.Execute(, parametro1)

Lo anterior funciona y me devuelve el Recordset, el tema es que me da un error cuando lo quiero enlazar a un reporte:

Report.Database.Tables(1).SetDataSource aRs
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
CRViewer1.Zoom 100
CRViewer1.DisplayGroupTree = False

Me dice:

Error ODBC. Pocos Parámetros se esperaba 1

Mmmm ya se esta consuta termina en el olvido...

:(