A D B O B J E C T S 函 数

把当前数据库中的命名连接名 关系名 表名或 SQL 视图名放到一个变量数组中

语 法

ADBOBJECTS ( ArrayNam e, cSetting )

返 值 类 型

数值型

参 数 描 述

ArrayName

指 定 存 放 数 据 库 名 称 的 数 组 名 若 指 定 数 组 不 存 在 V isual FoxPro 将 自 动 创建 一 个 数 组 如 果 数 组 存 在 但 数 组 大 小 不 足 以 包 含 所 有 名 称 则 V isual FoxPro 自 动 增 大 数 组 使 得 数 组 能 容 纳 所 有 名 称 如 果 数 组 的 大 小 超 过 所 需值 V isual FoxPro 将 截 掉 多 余 部 分 如 果 数 组 存 在 但 由 于 没 找 到 任 何 名 称导 致 ADBOBJECTS 函 数 返 回 值 为 零 则 数 组 内 容 将 保 持 不 变 如 果 数组 不 存 在 并 且 ADBOBJECTS 函 数 返 回 值 为 零 则 不 创 建 指 定 数 组

如果一维数组在创建时指定为 CONNECTION TABLE 或 VIEW 则一维数组中每行包含数据库中的连接名 表名或视图名

如果创建二维数组时指定为 RELATION 则二维数组的每行对应数据库中的一个关 系 数组第一列存放子表名 第二列存放父表名 第三列存放子表的索引标识名 第四列存放父表的索引标识名

数组的第五列存放参照完整性信息 如果关系没有参照完整性规则 则这一列为空 如果关系具有参照完整性规则 则这一列存放一些字符 这些字符决定了修改 删除和插入的参照完整性规则类型

第一个字符代表更新规则类型 第二个字符代表删除规则类型 第三个字符代表插入规则类型

更新和删除的可选字符值为 C R 和 I 其中 C 表示级联 R 表示

约束 I 表示忽略 插入的可选字符值为 R 和 I 其中 R 表示约束

I 代表忽略 例如 如果某个关系的参照完整性规则是级联更新 约束删除和忽略插入 则第五列存放字符串 CRI

cSetting

指 定 哪 些 名 称 放 在 变 量 数 组 中 下 表 列 出 了 参 数 cSetting 的 可 选 值 和 放 在 数组 中 的 相 应 名 称

CSetting 值 名 称

CONNECTION 连接名

RELATION 表关系

TABLE 表名

VIEW 视图名

CONNECTION RELATION TABLE 和 VIEW 设置不能缩写

说 明

运行 ADBOBJECTS 函数时 必须有一个数据库是打开的 并且为当前数据库否则 Visual FoxPro 将产生错误信息

示 例

下面的示例首先打开数据库 testdata 然后用 ADBOBJECTS 函数创建名为

gaTables 的数组 数组将包含数据库中的表名 最后显示这些表名

• 关闭所有数据库

CLOSE DATABASES

• 清除桌面

  准备显示数组

CLEAR

• 打开示例用 testdata 数据库

OPEN DATABASE (HOME(2) + 'Data\testdata')

• 调用函数