Come compattare MS Access DB in VB

August 8

Come compattare MS Access DB in VB


Avere la conoscenza su come compattare un database di Microsoft Office Access utilizzando Microsoft Visual Basic.NET, o VB.NET, consente di risparmiare tempo quando si ha bisogno di compattare un database continuamente. Access è un sistema di gestione di database relazionale utilizzato per progettare piccoli database locali. VB.NET è un linguaggio di programmazione utilizzato per creare applicazioni Windows. È possibile risparmiare spazio su disco rigido per la compattazione di un database. In pochi passi è possibile creare un progetto VB.NET e compatta un database di Access locale.

istruzione

1 Aprire Microsoft Visual Basic Express e selezionare "Nuovo progetto ..." dal riquadro sinistro dello schermo. Fai clic su "Visual Basic" nella sezione "Modelli installati" e fare doppio clic su "Applicazione console."

2 Fare clic sul riquadro "Strumenti" e fare doppio clic su "Pulsante" per aggiungere un nuovo pulsante al form. Fare clic sul menu "Progetto" e selezionare "<nomeprogetto> Proprietà". Fai clic su "Riferimenti", quindi selezionare "Aggiungi". Selezionare "COM" e fare clic su "Microsoft Jet e Replication Objects <numero di versione> Libreria". Fai clic su "OK".

3 Premere il tasto "Ctrl" e "A" per rimuovere tutto il codice esistente e copiare e incollare il codice sottostante nel tuo Module1.vb:

Module Module1

Sub Main()

Provare

Dim jetEng Come JRO.JetEngine

jetEng = Nuovo JRO.JetEngine ()

jetEng.CompactDatabase ( "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C: \ myaccess.mdb", _

"Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C: \ myaccesscompacted.mdb; Jet OLEDB: Motore = 5")

Fermo ex come eccezione

Console.WriteLine (ex.Message)

End Try

End Sub

Modulo fine

4 Modificare la seguente riga di codice e digitare il percorso e il nome del database di Access:

Source = C: \ myaccess.mdb

Premere il tasto "F5" per eseguire il programma e compattare il database.