Access & VBA FAQ
| | | |
Indice de temas
Tablas
Consultas
Formularios
Informes
Macros
Módulos
Base de datos
Miscelánea
API
Utilidades
Problemas
Cadenas
Fechas
Todos los temas
Base de datos : Compactar base de datos internacional
Autor/es:
Màrius Puig
Pregunta : He leído en este enlace o en este otro, cómo compactar a través de código la base de datos que se está ejecutando actualmente. Funciona correctamente. Pero, según deduzco, sólo servirá si la base de datos actual se ejecuta en una aplicación Access en idioma castellano. ¿Habría algún otro código que me permita hacer lo mismo, pero sin importar el idioma en el que esté Access?
Respuesta : Sí, existe otro modo de compactar la base de datos actual sin que importe el lenguaje de Access. Simplemente tienes que llamar esta función por su nombre, desde algún otro punto de tu código o de una macro
'---------------------------------------------------------
'
' CompactDb
'
' Código escrito originalmente por Màrius Puig y
' Juan M. Afán de Ribera
' Estás autorizado a utilizarlo dentro de una aplicación
' siempre que esta nota de autor permanezca inalterada.
' En el caso de querer publicarlo en una página Web,
' por favor, contactar con el autor en
'
'     http://www.mvp-access.com/foro/
'
' Este código se brinda por cortesía de
' Màrius Puig
' Juan M. Afán de Ribera
'
Function CompactDb()

    On Error Resume Next
    CommandBars. _
    FindControl(Id:=2071). _
    accDoDefaultAction
    
End Function
'---------------------------------------------------------

Ejemplos:

 

Temas relacionados:

Compactar base de datos actual (CommandBars)

Compactar base de datos actual (SendKeys)

 

Última actualización: 6/6/2005