Convert MDB database to another format (JET, access version)MOTOBIT.COM

Other articles:

Base64 decode VBS function (vb decoder algorithm), source code (http, Conversion, VBScript)

Email from ASP - Using external smtp server and CDO (VBScript, Email, ASP / ASP.Net, WSH)

HttpWebRequest.GetResponse for "404 Not Found" and similar http status codes (VB.Net)

Areas > Languages > VBScript
Areas > ASP / ASP.Net > Database > Data access > JRO
Areas > ASP / ASP.Net > Database > MDB

Convert from any MDB format to Access2000 format (Engine type 5) :

Const Jet10 = 1
Const Jet11 = 2
Const Jet20 = 3
Const Jet3x = 4
Const Jet4x = 5

DoConvertMDB "C:\data\MyDB97.MDB", "C:\data\MyDB2000.MDB", Jet4x

Sub DoConvertMDB(SourceDB, DestDB, Format)
    Dim Engine
    Set Engine = CreateObject("JRO.JetEngine")
    Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SourceDB, _
      "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=" & Format & ";Data Source=" & DestDB
End Sub

Copyright and use this code

The source code on this page and other samples at https://www.motobit.com/tips/ are a free code, you can use it as you want: copy it, modify it, use it in your products, ...

If you use this code, please:

1. Leave the author note in the source.

2. Link this sample from you page.

<A
 Href="https://www.motobit.com/tips/detpg_ConvertMDB/"
 Title="How to convert Access database from
	one format to another format
	from ASP/VBS script."
>Convert MDB database to another format (JET, access version)</A>

Do you like it? Rate me on LinkedIn

Motobit.com

Convert MDB database to another format (JET, access version)MOTOBIT.COM

See also

Copyright and use this code