Visual Basic - Quien podria sacarme de este lio que no entiendo

Sabes, utilizo un codigo para llamar la actulizacion de unos registros
utilizando un lista, Y una Conexion DSN

pero la conexion esta bien el problema es cuando trato de abrir el RS
que medices el siguiente mensaje.

Microsoft(Controlador ODBC ) Microsoft Access ( ERROR DE SINTASIS en la clausula FROM

es decir donde abre el recordset

RS.OPEN ' Aqui es este error que me tiene loco si alguien sabes como puedo solucionar este diabolico error por favor se lo agradecere

AQUI ESTA EL CODIGO QUE UTILIZO PARA QUE COMPRENDA BIEN LO QUE DIGO
Option Explicit
Private cn As ADODB.Connection
Private mrs As ADODB.Recordset

Private Sub CmdCancelar_Click()
Dim Consul As String
'abrir un recorset vacio
Consul = "select*" & _
"from tinve" & _
"where clave01=0"


mrs.Source = Consul
Set mrs.ActiveConnection = cn


mrs.AddNew
mrs.Open
mrs.Fields("codigo") = txtCoo.Text
mrs.Fields("descrip") = txtDee.Text
'mrs.Fields("descrip") = txtCaa.Text
mrs.Update
mrs.Close

cmdLista_Click

End Sub

Private Sub cmdLista_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Source = "select *" & _
"from tinve" & _
"where codigo = 'Txtcoo' " & _
"order by codigo,unidad"
Set rs.ActiveConnection = cn
rs.Open
List1.Clear
Do While rs.EOF
List1.AddItem rs.Fields("Codigo") & "" & _
rs.Fields("unidad") & "%2

No será que te has dejado los espacios en blanco?

"select * " & _
"from ..."

Antes de las comillas hay que dejar un espacio para que la instrucción sea correcta.

Espero que sea esto.
Salu2.