Visual Basic - URGENTE. Error '3061'

Saludos a tod@s

Tengo la siguiente consulta:

Dim Acceso as Database
Dim reConsulta as Recordset
Dim Fecha_Inicial as date
Dim Fecha_Final as date

Set Acceso = DBEngine.Workspaces(0).OpenDatabase(gsDatabase)

Fecha_Inicial=txt_Del.text ‘ <- Variable que asigna la fecha, en el ejemplo 2003/03/02
Fecha_Final=txt_Al.text ‘ <- Variable que asigna la fecha, en el ejemplo 2003/04/02

Línea = "select * from Acuerdos where Fecha__Acdo between '” & Fecha_Inicial _
& “' and '” & Fecha_Final & ”' order by Fecha_Acdo asc"

Set rsConsulta = Acceso.OpenRecordset(Línea)

La cual me arroja el error

Error ‘3061’ en tiempo de ejecución:
Pocos parámetros. Se esperaba 1.

¿Alguien sabe a qué se debe? ¿Cómo puedo corregirlo?

Prueba con esto :

Línea = "select * from Acuerdos " & _
"where Fecha__Acdo >= '” & Fecha_Inicial & “' and ” & _
"Fecha__Acdo <= '” & Fecha_Final & “' ” & _
" order by Fecha_Acdo asc"

Gracias, produce el mismo error, ya también intenté con el símbolo # en lugar del apóstrofo.

saludos.. colega..

bueno veamos..

set MiRecordset(MiSqlString,2)
y efectivamente las fechas en access van entre #04-11-2003#

Set rsConsulta = Acceso.OpenRecordset(Línea,2)
ojo el parametro "2" ...

espero te funcione..

Gracias. Ya está solucionado, el problema estaba en el nombre del campo, por un error de digitación tenía doble raya baja en lugar de una ola raya baja, es decir "Fecha _ _ Acdo" en lugar de "Fecha _ Acdo", me di cuenta del error al digitar nuevamente la instrucción.

Gracias. Ya está solucionado, el problema estaba en el nombre del campo, por un error de digitación tenía doble raya baja en lugar de una ola raya baja, es decir "Fecha _ _ Acdo" en lugar de "Fecha _ Acdo", me di cuenta del error al digitar nuevamente la instrucción.