VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

Compact Access 2000/XP Databases with one line of Code. Fast. Easy.

José Luis Farías  (6 Submissions)   Databases/Data Access/DAO/ADO   Visual Basic 5.0   Intermediate   Wed 3rd February 2021

Compact Access Databases with one line of Code!
"One line of Code", like this: ;-)
CompactDB Database, ShowResume, Password
or this example:
CompactDB App.Path & "\Datos.mdb", True, "Joselo.11·#"
Private Sub CompactDB_Click()
If DB Is Nothing Then 'the database is Closed
CompactDB App.Path & "\Datos.mdb", True, "Joselo.11·#" 'compact
Else 'the database is open
DB.Close 'close
CompactDB App.Path & "\Datos.mdb", True, "Joselo.11·#" 'compact
[Call your Routine to load database] 'Open database
End If
End Sub
Works fine with Access 2000 and XP
Actual Revision - Jan/20/2004
Jan/20/2004
· some Form changes.
· fixed some variables declarations. (Variants in place of Strings).
· added Compact Password protected databases.
· added some Comments.
· added some Code examples.
· added a compress level indicator.
Jul/25/2003
· Initial Release

Rate Compact Access 2000/XP Databases with one line of Code. Fast. Easy. (7(7 Vote))

Download Compact Access 2000/XP Databases with one line of Code. Fast. Easy.

Compact Access 2000/XP Databases with one line of Code. Fast. Easy. Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters