C#压缩ACCESS数据库的类源码

C#压缩ACCESS数据库的类源代码

此代码有参考网上的思路，看过的网上的参考基本上都没有涉及到带密码数据库的处理，经过漫长的试错过程，终于搞定了。（我在测试的时候，用的是access2003生成的 mdb 文件进行测试的。）
在此备忘和分享，希望有需要的人可以少走一些弯路。

源代码A

须添加引用 “JRO.JetEngine” COM对象

        #region 压缩Access数据库
        /// <summary>
        /// 压缩修复数据库工具
        /// 注：考虑到数据库已被打开的情况，此处方案为先COPY原数据库，再压缩COPY数据库，再覆盖原数据库，再删除临时数据库
        /// </summary>
        /// <param name="path">数据库物理路径</param>
        /// <param name="password">数据库密码</param>
        /// <returns></returns>
        public static bool CompactAccessDB(string path, string password)
        {
            if (path == null || password == null) return false;
            if (path.Equals("")) return false;
            string path2 = path.Substring(0, path.LastIndexOf('.')) + "tmp.mdb";
            string path3 = path.Substring(0, path.LastIndexOf('.')) + "copy.mdb";
            File.Copy(path, path3, true);

            string dbConn3, dbConn2;
            dbConn3 = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=" + password + ";Data Source=" + path3;
            dbConn2 = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=" + password + ";Data Source=" + path2 + ";Jet OLEDB:Engine Type=5";

            try
            {
                JRO.JetEngine dbEngin = new JRO.JetEngine();
                dbEngin.CompactDatabase(dbConn3, dbConn2);//压缩

                File.Copy(path2, path, true);//将压缩后的数据库覆盖原数据库
                File.Delete(path2);//删除压缩后的数据库
                File.Delete(path3);//删除压缩前的Copy数据库

                return true;
            }
            catch (Exception e)
            {
                Console.WriteLine("AccessDbTool.compactAccessDB" + " " + e.Message);
                return false;
            }
        }
        #endregion

        

源码B：

代码使用了"迟绑定"(运行中在内存中建立COM对象)，这样就不需要加入COM引用了,也不需要在PC上安装MS Access应用程序，只需要一个Jet引擎(Jet引擎包含在MDAC安装包中，在Windows NT4以后的版本中，系统已经自带了这个引擎)。

        /// <summary>
        /// 压缩修复数据库工具
        /// 注：考虑到数据库已被打开的情况，此处方案为先COPY原数据库，再压缩COPY数据库，再覆盖原数据库，再删除临时数据库
        /// </summary>
        /// <param name="path">数据库物理路径</param>
        /// <param name="password">数据库密码</param>
        /// <returns></returns>
        public static bool KCompactAccessDB(string path, string password)
        {
            if (path == null || password == null) return false;
            if (path.Equals("")) return false;
            string path2 = path.Substring(0, path.LastIndexOf('.')) + "tmp.mdb";
            string path3 = path.Substring(0, path.LastIndexOf('.')) + "copy.mdb";
            File.Copy(path, path3, true);

            string dbConn3, dbConn2;
            dbConn3 = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=" + password + ";Data Source=" + path3;
            dbConn2 = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=" + password + ";Data Source=" + path2 + ";Jet OLEDB:Engine Type=5";

            try
            {
                object objJRO = Activator.CreateInstance(Type.GetTypeFromProgID("JRO.JetEngine"));
                //压缩
                object[] oParams;
                oParams = new object[] { dbConn3, dbConn2 };
                objJRO.GetType().InvokeMember("CompactDatabase", System.Reflection.BindingFlags.InvokeMethod, null, objJRO, oParams);

                File.Copy(path2, path, true);//将压缩后的数据库覆盖原数据库
                File.Delete(path2);//删除压缩后的数据库
                File.Delete(path3);//删除压缩前的Copy数据库

                System.Runtime.InteropServices.Marshal.ReleaseComObject(objJRO);
                objJRO = null;

                return true;
            }
            catch (Exception e)
            {
                Console.WriteLine("AccessDbTool.compactAccessDB" + " " + e.Message);
                return false;
            }

        }

注意事项

函数的参数 path ，是包含数据库文件名的全路径，在C#变成中，注意要加转义符 “ \ ” 在路径中的 “ \ ” 前面，否则会出错：比如你的文件在 d:\data\DT.mdb , 那么你在写代码的时候，要写成：

string path ="d:\\data\\DT.mdb";

这一点，对于刚从VB.NET转过来C#的我来说，走了弯路的。

使用举例

string path ="d:\\data\\DT.mdb";//Access数据库完整路径
string password="123456";//数据库密码
//代码A
//bool b=CompactAccessDB(path,password);
//代码B
bool b=KCompactAccessDB(path,password);
if(b)
{MessageBox.show("数据库压缩和修复成功！");}
else
{MessageBox.show("数据库压缩和修复失败！");}

好东西，不独享！
转载请注明出处。