共享数据的锁定--多客户环境下VB数据库编程之(3)

玉行天下888

玉行天下888

2016-02-19 12:56

有一种朋友不在生活里,却在生命力;有一种陪伴不在身边,却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗?话不多说下面就和大家分享共享数据的锁定--多客户环境下VB数据库编程之(3)吧。
前一节介绍了对数据访问的一些限制,其中讲到了对表的锁定。这一节将进一步地谈一谈如何实现共享数据的锁定操作。要保护共享数据,可以在用户编辑数据时锁定它。数据被锁定后,任何用户都可以读取它,但仅有一个用户可以修改它。MicrosoftJet可以在以下三种不同的级别上锁定数据:
  
  ·独占模式:阻止其他所有用户访问数据库,这是限制最大的模式,上一节已介绍过。
  ·记录集锁定:即锁定Recordset对象的基本表,用读表锁定、写表锁定或两者都用。
  ·页面锁定:锁定含有正在编辑的数据的页面,其长度为2048个字节(2K)。这是限制最小的模式。
  
  在应用程序中用哪一种模式来锁定对象,主要看所需要的并发级别。例如,如果想使对象在任何时候都可用,则可使用页面锁定,因为它是限制最小的级别。如果应用程序要保证数据库中的大多数或所有数据都可访问,则应选择独占模式,这种模式确保应用程序独占数据库的访问。注意,这三种级别可以结合使用。例如,假定有一个订单系统,则可以用页面锁定来控制订单表的锁定,使订单接收者之间的并发程度最高。在一天结束时用记录集锁定来锁定汇总表,这个汇总表要用汇总数据来更新。最后,可以在夜间使用独占模式来整理数据库。
  
  1.共享模式与独占模式
  
  如前所述,独占模式是打开数据库限制最大的方式,它阻止其他所有用户打开该数据库。这种模式常用于数据库管理或数据库的批量修改,例如修复或整理操作以及改变数据库的结构等。在单用户环境中访问数据库时,通常以独占模式打开数据库,这可以提供更好的性能,因为MicrosoftJet不必对对象进行锁定和解锁,也不必刷新高速缓存器。但是,当在多用户环境中使用应用程序时,通常以共享模式打开数据库。
  
  (1).以共享模式打开数据库
  
  为了实现记录集锁定,必须以共享模式打开数据库。当以共享模式打开数据库时,可能会有多个用户同时对数据库进行访问,在这种情况下,MicrosoftJet将处理各用户间试图编辑相同记录的冲突。前一节中讲过,当用OpenDatabase方法打开数据库时,只要把Options参数的值设置为False,就能以共享模式打开数据库。下面举一个例子。
  
  编写一个Function过程,调用该过程,可以根据需要用共享模式或独占模式打开数据库。过程如下:
  
  FunctionOPenDatabaseX(dbsAsDatabase,strDBPathAsString,blnExclusiveAsBoolean)AsInteger'关闭错误捕获
  
  OnErrorResumeNext'打开strDBPath所指定的数据库。如果blnExclusive为True,则以独占模式打开数据库:否则,以共享模式打开数据库
  
  Setdbs=OpenDatabase(strDBPath,blnExclusiVe)
  SelectCaseErr
  CaSe0:
  OPenDatabaseX=0
  Case3033:
  OpenDatabaseX=3033
  Case3343:
  OpenDatabaseX=3343
  Case3044:
  OpenDatabaseX=3044
  Case3024:
  OpenDatabaseX=3024
  CaseElse:
  OpenDatabaseX=-l
  EndSelect
  EndFunCtion
  
  该过程以共享模式或独占模式打开一个数据库,由参数blnExclusive决定。如果blnExclusive参数为True,则数据库以独占模式打开;否则,数据库以共享模式打开。在该过程中,用错误处理程序来检测错误,并根据过程调用的执行情况返回错误代码。该过程有3个参数,分别为数据库对象变量名、数据库名(包括路径)和模式开关。为了调用这个过程,应先用Dim语句声明一个Database对象变量,然后把这个对象变量和数据库的名字(strDBPath)一起传送给OpenDatabaseX过程。在调用OpenDatabaseX的代码时,应当检查OpenDatabaseX的返回值,看是否有错误发生,然后根据发生的错误采取相应的措施。在窗体上画一个命令按钮,然后在下面的事件过程中调用过程OpenDatabaseX:
  
  PnvateSubCommandl_Click()
  DimaAsInteger
  DimMvDbsAsDatabase
  a=OpenDatabaseX(MyDbs,"c:Vb50iblio.mdb",False)
  SelectCasea
  Case0:
  MsgBox"调用成功"
  Case3033:
  MsgBoxError(3033)
  Case3343:
  MsgBOxError(3343)
  Case3044:
  MsgBoxEnor(3044)
  Case3024:
  MsgBoxError(3024)
  CaseElse:
  MSgBoxError(3024)
  EndSeleCt
  EndSub
  
  OPenDatabaseX过程的返回值是一个整型数,它是调用时产生的错误代码。当返回值为0时,表示调用成功,显示一个信息框。上述事件过程以共享方式打开一个数据库,如果把OpenDatabaseX的第三个参数改为True,则以独占方式打开该数据库。如果在调用时出错,则将返回错误代码,在事件过程中用Error函数显示相应的信息。例如,假定把数据库名改为:e:vb50iblio.mdb。则由于该数据库的路径不对而出错,产生出错信息。
  
  (2).使用只读模式
  
  只读模式是共享模式的特殊形式。当以只读模式打开一个数据库时,不能改变数据库的数据或对象。但是,其他用户可以改变数据,不要把这种模式与在操作系统级以只读模式打开文件相混淆。下面的代码以独占的只读模式打开一个数据库:
  SetdbsOrdEntry=OpenDatabase("OrdEntry.mdb",True,True)
  如果以共享的只读模式打开一个数据库,则应使用下面的代码:
  SetdbsOrdEntry=OpenDatabase("OrdEntry.mdb",False,True)
  注意,以只读模式打开数据库时,并不禁止共享表类型的锁定或读锁定;因此,以只读模式打开数据库不能防止锁定冲突的发生。限制程序为只读方式的另一种办法是为记录集使用快照,快照类型的记录集总是只读的。当基表中的数据不需要经常修改时,可以使用快照。由于快照存放在内存中,因此其操作比使用表或动态集的相同操作速度要快。但是,由于快照的内存需求和装入内存时要花费一定的时间,最好把快照用于返回记录在200以内的查询中。->

展开更多 50%)
分享

猜你喜欢

共享数据的锁定--多客户环境下VB数据库编程之(3)

编程语言 网络编程
共享数据的锁定--多客户环境下VB数据库编程之(3)

页面锁定--多客户环境下VB数据库编程之(5)

编程语言 网络编程
页面锁定--多客户环境下VB数据库编程之(5)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

页面锁定的锁定方案--多客户环境下VB数据库编程之(7)

编程语言 网络编程
页面锁定的锁定方案--多客户环境下VB数据库编程之(7)

记录集锁定--多客户环境下VB数据库编程之(4)

编程语言 网络编程
记录集锁定--多客户环境下VB数据库编程之(4)

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

数据访问控制--多客户环境下VB数据库编程之(2)

编程语言 网络编程
数据访问控制--多客户环境下VB数据库编程之(2)

MicrosoftJet的多客户模型--多客户环境下VB数据库编程之(1)

编程语言 网络编程
MicrosoftJet的多客户模型--多客户环境下VB数据库编程之(1)

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

VB与VC通信初探(一)

VB与VC通信初探(一)

JS、HTML代码运行工具

JS、HTML代码运行工具
下拉加载更多内容 ↓