U N L O C K 命 令

对一个表中的单条记录 多条记录或者文件解锁 或者对所有打开的表解除所有记录锁和文件锁

语 法

UNLOCK

[RECORD nRecordNumbe r] [IN n W orkArea |cTableAlias ] [ALL]

参 数 描 述

RECORD nRecordNumber

解 除 第 nRecordNumber 个 记 录 上 的 记 录 锁 可 以 令 nRecordNumber 为 0 来解 除 LOCK(0) 或 RLOCK(0 ) 锁 定 的 表 头

解除第 nRecordNumber 个记录上的记录锁 可以令 nRecordNumber 为 0 来解除

LOCK(0) 或 RLOCK(0) 锁定的表头

IN n W orkArea |cTableAlias

从 指 定 工 作 区 内 的 表 中 解 除 记 录 锁 或 文 件 锁 nWorkArea 指 定 工 作 区 号 而

cTableAlias 指 定 表 的 别 名 如 果 不 包 含 nWorkArea 或 cTableAlias 参 数 则

UNLOCK 从 当 前 工 作 区 内 的 表 中 解 除 记 录 锁 或 文 件 锁

ALL

解 除 所 有 工 作 区 中 的 全 部 记 录 锁 和 文 件 锁

有关网络上的记录 文件锁定与共享表的详细内容 请参阅 MicrosoftVisualFoxPro6.0

中文版程序员指南 的第十七章 共享访问程序设计

说 明

记录锁和文件锁只能由加锁的用户从表中删除 UNLOCK 命令不能解除独占使用的表的锁定

如果执行不带参数的 UNLOCK 命令 则解除当前工作区中表的记录锁或文件锁如果执行不带参数的 UNLOCK 命令 则解除当前工作区中表的记录锁或文件锁示 例

CLOSEDATABASES SETREPROCESSTO3AUTOMATIC

STORE'1,2,3,4'TOgcRecList&& 锁 定 记 录 1 至 4 gcOldExc=SET('EXCLUSIVE')&& 保存 EXCLUSIVE 设置SETEXCLUSIVEOFF&& 允许表共享

CLOSEDATABASES

OPENDATABASE(HOME(2)+'Data\testdata') USEcustomer&& 打开 Customer 表SELECT0

USEemployee&& 打开 Employee 表

?LOCK('1,2,3,4','customer')&& 锁定 customer 中的头四个记录

?RLOCK(gcRecList,'employee')&& 锁定 employee 中的头四个记录 employee

UNLOCKIN customer

UNLOCKIN employee

SETEXCLUSIVE&gcOldExc&& 保存原始的 EXCLUSIVE 设置

请 参 阅

FLOCK(),LOCK(),RLOCK()