将SQL Server中所有表的列信息显示出来

发表于:2007-05-25来源:作者:点击数: 标签:sql出来所有信息显示
正在作一个关于 SQL SERVER 数据库 导入Excel文件的程序,要读取数据库中的列的信息,从网上找了很多资料,终于总结出来比较理想的 sql 语句,执行后返回的列分别是:表名、列名、列类型、列长度、列描述、是否主键,语句如下: 1 Select Sysobjects.Name As
正在作一个关于SQL SERVER数据库导入Excel文件的程序,要读取数据库中的列的信息,从网上找了很多资料,终于总结出来比较理想的sql语句,执行后返回的列分别是:表名、列名、列类型、列长度、列描述、是否主键,语句如下:
 1Select Sysobjects.Name As Tb_name, Syscolumns.Name As Col_name, Systypes.Name As Col_type, Syscolumns.Length As Col_len, Isnull(Sysproperties.Value,Syscolumns.Name) As Col_memo,
 2Case When Syscolumns.Name In
 3(Select 主键=A.Name
 4From Syscolumns A
 5Inner Join Sysobjects B On A.Id=B.Id And B.Xtype='U' And B.Name<>'Dtproperties'
 6Where Exists(Select 1 From Sysobjects Where Xtype='Pk' And Name In (
 7Select Name From Sysindexes Where Indid In(
 8Select Indid From Sysindexkeys Where Id = A.Id And Colid=A.Colid
 9)))
10And B.Name=Sysobjects.Name
11)
12Then 1 Else 0 End As Is_key
13
14From Sysobjects,Systypes,Syscolumns
15Left Join Sysproperties On (Syscolumns.Id = Sysproperties.Id And
16Syscolumns.Colid = Sysproperties.Smallid)
17
18Where (Sysobjects.Xtype ='U' Or Sysobjects.Xtype ='V')
19And Sysobjects.Id = Syscolumns.Id And Systypes.Xtype = Syscolumns.Xtype
20And Systypes.Name <> 'Sysname' And Sysobjects.Name Like '%' Order By Sysobjects.Name, Syscolumns.Colid

结果如图:

Click to Open in New Window

原文转自:http://www.ltesting.net