SQL/Delphi 获得数据库中所有表名和表字段的方法(MS SQL、MySQL)

Delphi 获得数据库中所有表名和表字段的方法(MS SQL、MySQL)

1、通过内置函数（GetTableNames、GetFieldNames）

?

1	ADOConnection1.GetTableNames(ComboBox1.Items, False);  //获取所有表名

?

1	ADOConnection1.GetFieldNames(sTableName,ComboBox1.Items);  //获取表的所有字段名

2、通过SQL语句（例如：SQL SERVER）

?

1 2 3 4 5 6 7 8 9

--MS SQL 查看所有表名： select name from sysobjects where type='U' --MS SQL 查询表的所有字段名： Select name from syscolumns Where ID=OBJECT_ID('表名')   --MySQL 查看所有表名： select table_name from information_schema.tables;   --MySQL 查询表的所有字段名： select column_name from information_schema.columns where table_name = Trim('表名')

 

?

1 2 3

--MS SQL 联合表和字段，及长度查询　　2022.11.17 Select sysobjects.name AS 表名,syscolumns.name as 字段,syscolumns.length as 字段长度 from syscolumns LEFT JOIN sysobjects ON sysobjects.id=syscolumns.id  where syscolumns.name like '%xxx%'

　　

 

 

 

创建时间：2021.02.03　　更新时间：2021.12.07　　2022.11.17