La Web del Programador: Comunidad de Programadores
 
    Pregunta:  42448 - EXPORTAR TABLAS Y CONSULTAS EN VB 6 VS ACCESS 2000
Autor:  Ernesto Parrilla Garrido
Hola.
Trabajo con Windows 2000 y utilizo Visual Basic 6.0. Estoy pasando una aplicación realizada para Access 97 a Access 2000 utilizando DAO 3.6. La aplicación antigua tiene una opción de exportar tablas y consultas a otra base de datos, por código sería así:

Set AplicAccess = CreateObject("Access.Application.8")
AplicAccess.DoCmd.RunCommand acExportar

Pero con Access 2000 esto no funciona, cómo podría realizar lo mismo con Access 2000.

Muchas Gracias

  Respuesta:  Gustavo juárez
Puedes usar la accion TransferirBaseDatos. La sintaxis quedaría más o menos así:

DoCmd.TransferDatabase [tipotransf],tipobasededatos,nombrebasededatos[,tipoobjeto],origen,
destino[,soloestructura][,guardariddeinicio]

donde
tipotransf :
acExport, acImport (predeterminado), acLink

tipobasededatos
Microsoft Access (predeterminado)
Jet 2.x
Jet 3.x
dBaseIII
dsBaseIV
dBase5
Pradox 3.x
Paradox 4.x
Paradox 5.x
Paradox 7.x
Basede datos ODBC

nombrebasededatos - incluye la ruta de acceso

tipoobjeto:
acTable (predeterminado)
acQuery
acForm
acReport
acMacro
acModule
acDataAccessPage
acServerView
acDiagram
acStoredProcedure

origen

destino

soloestructura:
True
False

guardaridinicio
True
False

ejemplo:
DoCmd.TransferDatabase acImport, "dBase III", "c:\Midirectorio\basededatos.dbf", acTable, "archivo.dbf","MiTabla"

Espero te pueda servir de algo

Saludos!