Hvordan skal komprimeres MS Access DB i VB

Å ha kunnskap om hvordan å komprimere en Microsoft Office Access database ved hjelp av Microsoft Visual Basic.NET eller VB.NET, kan du spare tid når du trenger å kontinuerlig komprimere en database. Access er en relasjonsdatabase management system brukes til å designe små lokale databaser. VB.NET er et programmeringsspråk som brukes til å lage Windows-programmer. Du kan spare plass på harddisken ved å komprimere en database. I noen få trinn kan du opprette en VB.NET prosjekt og kompakt en lokal Access database.

Bruksanvisning

1 Åpne Microsoft Visual Basic Express og velg "New Project ..." fra den venstre ruten på skjermen. Klikk på "Visual Basic" under "Installerte maler" og dobbeltklikk på "Console Application".

2 Klikk på "Toolbox" panelet og dobbeltklikk på "knapp" for å legge til en ny knapp i skjemaet. Klikk på "Project" -menyen og velg "<prosjektnavn> Egenskaper." Klikk på "Referanser" og velg deretter "Legg til". Velg "COM" og klikk "Microsoft Jet og Replication Objects <versjonsnummer> Bibliotek." Klikk på "OK".

3 Trykk "Ctrl" og "A" for å fjerne alle eksisterende kode, og kopiere og lime inn koden nedenfor i din Module1.vb:

modul module1

Sub Main()

Prøve

Dim jetEng Som JRO.JetEngine

jetEng = Ny 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: Motortype = 5")

Catch ex As Exception

Console.WriteLine (ex.Message)

End Try

End Sub

End Module

4 Redigere følgende linje med kode og skriv inn banen og navnet på Access database:

Source = C: \ myaccess.mdb

Trykk "F5" for å kjøre programmet og komprimere databasen.