Visual FoxPro - 表格计数

Visual FoxPro - Tables Count

我正在使用 Visual Fox Pro 9.0 并且是新手。 请帮助解决如何获取 fox pro 数据库中不存在的表的问题?

提前致谢。

ADbObjects() 函数可以获取各种数据库对象。要获取表格,请将其第二个参数设置为 'TABLE'。即:

* Assuming database is open and current database
Local Array laTables[1]
Local ix
For ix = 1 To Adbobjects(laTables,"TABLE")
    ? laTables[m.ix]
Endfor

获取该信息的笨拙方法(如果您有 Fox IDE - 并且可以使用命令 window)是: 关闭数据库(这是您要查看的数据库 - 检查它是否打开) 使用数据库独占 浏览

然后您将获得数据库中表的列表。不漂亮,但有效

这将打印数据库中表的数量

?ADBOBJECTS(databaseName, "TABLE")