no funciona clausula "Where"

Hola de nuevo grupo
Hace un rato hice una pregunta, ya reolsvi ese problema, pero ahora tengo
este
al aplicar la clausula WHERE, la cosa esta asi:

...
...
Dim cnxn As ADODB.Connection
Dim rstFac As ADODB.Recordset
Dim rstLoc As ADODB.Recordset
Dim strCnxn As String
Dim strSQL As String

strCnxn = "Driver={Microsoft dBASE Driver (*.dbf)};" & _
"DriverId!;DefaultDir=\\Cobranzas\c\MOLACT;"

strSQL = "Select cvecli, concli, feccli From faccli where CVECLI=' 1'
order by cvecli"

Set cnxn = New ADODB.Connection
cnxn.Open strCnxn
Set rstFac = New ADODB.Recordset
rstFac.Open Source:=strSQL, ActiveConnection:=cnxn, Options:=adCmdText
...
...

Al intentar abrir el rcorset me manda este mensage:
"[Microsoft][Controlador ODBC dBase] Indice no encontrado"

El tipo de dato del campo CVECLI es "adVarChar"( Un valor de tipo String
(sólo para el objeto Parameter) )
por eso lo escribo con apostrofos y tres espacios.

Ojala me puedan ayudar
Gracias de antemano

Rene Moreno