Programación General > Visual Basic 6.0 e inferiores

 Re: COMPACTAR BASE DE DATOS

(1/1)

FER_LUCAS33:
HOLA A TODOS

alguien sabe como se puedo ejecutar desde visual basic la opción de "Compactar y Reparar Base de Datos" de Access.

Gracias
:question:

margompe:
Antes de compactar una base de datos, debe cerrarla. Además, nunca debe asignar los mismos nombres de origen y de destino para la base de datos que se está compactando, ya que la base de datos se eliminará si el método CompactDatabase no se completa. La compactación no se puede efectuar dentro de una transacción.
La sintaxis del método CompactDatabase es la siguiente:
DBEngine.CompactDatabase nombre_origen, nombre_destino [, configuración_regional [, opciones]]
   
Argumento   Descripción
   
nombre_origen   El argumento nombre_origen es la ruta completa y el nombre del archivo de base de datos que desea compactar.
nombre_destino   El argumento nombre_destino es la ruta completa y el nombre del archivo de base de datos recién compactado. No especifique el mismo nombre para ambos, los archivos de origen y de destino.
configuración_regional   El argumento configuración_regional es el mismo que el de CreateDatabase.
opciones    El argumento opciones es el mismo que el de CreateDatabase.
   
Por ejemplo, el código siguiente compacta una base de datos llamada Anterior.mdb y crea una nueva base de datos con una configuración regional española y un nombre de destino Nueva.mdb:
DBEngine.CompactDatabase "C:Anterior.mdb", "C:VBNueva.mdb", dbLangSpanish
:)

FER_LUCAS33:
gracias por tu ayuda
:yes:

FRIJU:
crea un moduolo y haz un call a compactar.
Public Function Compactar()
On Error GoTo Compactar_Err
 SendKeys "%", False
    SendKeys "h", False
    SendKeys "u", False
    SendKeys "o", False
Compactar_Exit:
    Exit Function

Compactar_Err:
    MsgBox error$
    Resume Compactar_Exit
End Function

Navegación

[0] Índice de Mensajes