Microsoft Visual Basic Express
Mostrar más instrucciones
1
Abra Microsoft Visual Basic Express y seleccionar "Nuevo proyecto ... " en el panel izquierdo de la pantalla. Haga clic en " Visual Basic " en " Plantillas instaladas" y haga doble clic en " Aplicación de consola. "
2 Haga clic en el panel " Herramientas " y haga doble clic en " botón " para añadir un nuevo botón a su formulario . Haga clic en el menú "Proyecto " y seleccionar " Propiedades 3 Pulse la tecla "Ctrl " y "A" para eliminar todo el código existente, y copiar y pegar el código de abajo en su Module1.vb : Sub Main () Prueba jetEng As JRO.JetEngine jetEng = New JRO.JetEngine () " Provider = Microsoft.Jet.OLEDB.4.0 ; Data Source = C : \\ myaccesscompacted.mdb ; Jet OLEDB: Engine Tipo = 5 " ) Catch ex As Exception Console.WriteLine ( ex. Mensaje ) End Try End Sub End Module editar la siguiente línea de código y escriba la ruta y el nombre de su base de datos Access : Fuente = C: \\ myaccess.mdb Press "F5 " para ejecutar el programa y compactar la base de datos .
< p > Módulo Module1
< p> jetEng.CompactDatabase ( " Provider = Microsoft.Jet.OLEDB.4.0 ; Data Source = C: \\ myaccess.mdb ", _
4