Visual Basic - access y visual

hola.mil gracias antes por la ayuda.
mi problema es el siguiente.tengo este codigo el cual crea perfectamente mi base de datos.pero, cuando abro esa base de datos dice q esta en una version anterior al access q tengo en mi maquina, q si quiero convertirla o abrirla, etc.
necesito q al crearse lo haga en la version actual de mi access 2000 en directo.sin convertirla, ya q luego al recuperar ese respaldo contra otra base de datos ya creada en access 2000 me da errores de datos.
ah y necesito crearla al access 2000 o convertirla es por codigo en visual basic 6.0.ya q el usuario final jamas entra a la base de datos creada.son procesos transparentes para el.
agradecida estare.

nombrerespaldo = InputBox("Introduzca el nombre del respaldo ")
Set MiWorkspace = DBEngine.Workspaces(0)
ruta = "C:\PFP\Respaldo Juridica\" & nombrerespaldo & ".mdb"
Set MiBaseDeDatos = MiWorkspace.CreateDatabase(ruta, dbLangGeneral)
Set MiBaseDeDatos = Nothing

Tienes que agregar la referencia Microsoft Ado ext. 2.x for dll and security
en este ejemplo yo utilizo la version 2.8, va a depender de la versión de mdac que tengas instalada en tu equipo

Crea un formulario y agrega 2 botones (CmdCrearBase y CmdCrearTabla)

Private Const Access97 = "Microsoft.Jet.OLEDB.3.51"
Private Const Access2000 = "Microsoft.Jet.OLEDB.4.0"

Private Sub CmdCrearBase_Click()
Dim Cat As New ADOX.Catalog
Cat.Create "Provider = " & Access2000 & "; Data Source = c:\BaseVB.Mdb;"

End Sub

Private Sub CmdCrearTabla_Click()
Dim Cat As New ADOX.Catalog
Dim Tbl As New ADOX.Table
Cat.ActiveConnection = "Provider = " & Access2000 & "; Data Source = c:\Basevb.mdb;"
With Tbl
.Name = "NuevaTabla" 'Asigno el nombre a la tabla
.Columns.Append "Id", adInteger
'Dependiendo del provider los campos string serán de un tipo u otro
' si son para access 2000 seran adVarWChar de lo contrario seran adVarChar
.Columns.Append "Nombre", adVarWChar, 20
.Columns.Append "Apellido", adVarWChar, 20

End With
Cat.Tables.Append Tbl ' agregamos la tabla a la coleccion de tablas

End Sub

Hola, mira cuando yo trabajo con access 2000, se tiene que convertir la base de datos a una verison anterior. El Access 2000 tiene una herramienta interna que lo puede hacer. Tienes que Abrir access e ir a Herramientas, luego a "Utilidades de la Base de Datos", luego "Convertir Base de Datos" y por ultimo eliges "a formato de archivo de Acces 97" y listo.

Sim embargo, hay otro metodo. Tienes que tener instalado el Microsoft Visual Basic (cualquier edicion, yo he trabajo con la empresarial, pero es lo mismo) y ademas el Servi Pack 6, este SP6 te instala tanto el en "Data Control" o "ADOBC" lo necesario para trabjar access 2000 sin necesidad de convertirla

Espero que te Ayude

Atte: Ing. de Sist. Carlo