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 actual (SendKeys)
Autor/es:
Francisco Javier García Aguado
Pregunta : ¿Cómo puedo compactar a través de código la base de datos actual? He leído que no es posible hacerlo desde la propia base de datosl y de hecho en las pruebas que he hecho, me aparece un aviso de que "no se puede compactar la base de datos abierta mientras se ejecuta una macro o código de Visual Basic"
Respuesta : Con este sencillo código puedes hacerlo
'---------------------------------------------------------
'
' CompactarBd
'
' Código escrito originalmente por Francisco Javier García
' Aguado (Búho)
' 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
'
'     buhonews@mvp-access.com
'
' Este código se brinda por cortesía de
' Francisco Javier García Aguado (Búho)
'
Sub CompactarBd()
    SendKeys "%huo"
End Sub
'---------------------------------------------------------

Ejemplos:

 

Temas relacionados:

Compactar base de datos actual (CommandBars)

 

Última actualización: 18/12/2004