RSS订阅 | TAGS | 工具箱 | 繁體

office Access应用

当前位置:奔牛网>office>Access应用>Acess错误:"文件共享锁定数溢出 请增加MaxLocksPerFile 注册表

Acess错误:"文件共享锁定数溢出 请增加MaxLocksPerFile 注册表

时间:2012-08-06 | 来源:互联网 |作者:loc |阅读:|

今天在操作将EXCEL中数据导入ACCESS的过程中出现这个错误,因为要导入的EXCEL太大了有几十万行。
如果大家在操作此类的大量数据时,特别是会计类的在坐年终结算统计时,出现这样错误:
-------------
"文件共享锁定数溢出 请增加MaxLocksPerFile 注册表项值"
-------------
原因如下:
Access数据库,同时操作大量记录(9500条以上)时报错。
Microsoft JET Database Engine 错误 '80040e21'
解决办法:
修改注册表
[HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Jet/4.0/Engines/Jet 4.0]
"MaxLocksPerFile"=dword:05f5e0ff
将MaxLocksPerFile默认的十进制值9500改大即可。呵呵,我改成了十进制的99999999
---------
解决办法:
-----------------
     Reg :=TRegistry.Create;

www.bnxb.com

     try
       Reg.RootKey := HKEY_LOCAL_MACHINE;      //查找注册表,
       If Reg.OpenKey('/SOFTWARE/Microsoft/Jet/4.0/Engines/Jet 4.0', False) then
         Reg.WriteInteger('MaxLocksPerFile',99999999);
     except
       Reg.Free;
     end; 本文来自奔牛网Bnxb.com

或: 本文来自奔牛网Bnxb.com

try
          Reg := TRegistry.Create;
          Reg.RootKey := HKEY_LOCAL_MACHINE;
          keyname := '/SOFTWARE/Microsoft/Jet/4.0/Engines/Jet 4.0';
          if Reg.OpenKey(KeyName,false) then
          begin
            if reg.ValueExists('MaxLocksPerFile') then
              Reg.WriteInteger('MaxLocksPerFile',99999999); 
          end;
        finally
          Reg.Free;
        end;

奔牛网Bnxb.com

(0)
(0)
相关推荐
最新评论