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

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

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

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

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

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

--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('表名')    

 

--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