如何锁定Access数据库以防止写入

Question

我找不到这个问题的答案，而且很难通过实验来确定。

我批量加载多个表到一个Microsoft Access数据库使用Perl与DBI和DBD::ODBC。所有查询都在单个事务中完成，该事务在加载结束时提交(或在出现错误时回滚)。数据库处于多用户环境中。

理想情况下，我想要锁定数据库，以便没有其他进程可以在我的加载过程中进行任何更改，这只持续大约一分钟，每天运行一次。这很重要的一个原因是，有时在加载期间，我必须查看@@identity以获得我刚刚插入的记录的自动编号ID。

• 记录锁定的设置应该是什么?我目前正在使用

  Default Open Mode – Shared
  Default record locking – Edited Record
  

• 事务在提交之前会锁定整个数据库吗?如果没有，是否有一种方法可以让我锁定使用DBI::ODBC的所有写?

通过实验，我可以看出Access正在为我做一些锁定，但我不能确定它是完全锁定。

更新:代码看起来像这样:

#!/usr/bin/perl -w
use strict;
use DBI; #database connection library
#open database connection
my $path='C:UsersmeDesktopmydb.accdb'; 
my $datasource = "Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=$path";

my $dbh = DBI->connect("dbi:ODBC:$datasource", '', '',
    {
            PrintError => 0,
            PrintWarn  => 1,
            RaiseError => 1,
            AutoCommit => 0,  
        }) || die "Error connecting: $!";

#Then I do various database operations.  Example:
#insert into database:
my $sth_insert = $dbh->prepare(qq{
INSERT INTO table1 (field1, field2)
values (?,?)
}) 
$sth_insert->execute($value1,$value2);  
#get back the autonumber ID: last_insert_id(undef,undef,undef,undef) is not supported
my $sqlQuery = 'SELECT @@IDENTITY';
my $sth_select = $dbh->prepare( $sqlQuery );
$sth_select->execute;
my $newId = $sth_select->fetchrow_array; #will this be reliable in multi-user environment with my settings?
#Then I commit the transaction:
$dbh->commit or die $DBI::errstr;

整个东西都在eval语句中，所以如果它踢出一个错误，我回滚而不是提交。

如果可以的话，我宁愿锁定所有内容(读和写)

Answer 1

我认为你没有问题。进程所附加的记录的Id不会被其他进程窃取。