Visual Basic - Al cambiar de DAO a ADO

Hice un cambio de los controles de una aplicación de DAO a ADO y a la vez cambié mi BD de Access 97 a Access 2000. Cambié además mi motor a Jet4.0, casi todo funciona bien, excepto que al grabar me envía un error de sintaxis en la instrucción (aunque la misma instrucción funciona para Access 97 y ADO).

Alguien podría decirme que pasa con Access 2000? Hay que cambiar algo en la sintaxis?

Espero sus comentarios y les agradezco de antemano su ayuda.

Hola Pablo:

primero que nada, cuentame, que error te da
y cuentame como abres la base de datos y el recordset.
para saber, cual es el problema que tienes.
Saludos

Esto es lo que tengo como código

Dim cnn As New ADODB.Connection
Set cnn = New ADODB.Connection
cnn.Open wg_constr
cnn.Execute wp_str
cnn.Close

Donde wg_constr = Provider=Microsoft.Jet.OLEDB.4.0;Data Source="BDSys.mdb";Persist Security Info=False

y wp_str = "Update TABLA Set Consecutivo = Consecutivo + 1 WHERE Campo = 'NFAC'"

Los Data Control (Ado DC) funcionan sin problema así como los SSOleDBGrid. Me muestran información y no hay detalles en ello.

Gracias por la ayuda.

Hola

Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection

wg_constr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\base.mdb"

wp_str = "Update TABLA Set Consecutivo = Consecutivo + 1 WHERE Campo = 'NFAC'"

cnn.Open wg_constr
cnn.Execute wp_str
cnn.Close

set cnn=nothing

Este codigo te resultará, ahora, si tienes problemas,
Fijate como esta la Ruta de base de datos, comprueba el nombre de los campos, fijate tambien en las Referencias, tiene que estar activado el "Microsoft ActiveX Data Objects 2.5 Library"

y si aun asi tienes problema, actualiza el SP6 de VB.
pero de todas formas te deberia funcionar.

Saludos.

Gracias, no me funcionó, te comento que ésto si funciona con 3.51, pero bueno, gracias de todas maneras por la molestia que te has tomado en ayudarme.

Hasta pronto!!