- Rongsen.Com.Cn 版权所有 2008-2010 京ICP备08007000号 京公海网安备11010802026356号 朝阳网安编号:110105199号
- 北京黑客防线网安工作室-黑客防线网安服务器维护基地为您提供专业的
服务器维护
,企业网站维护
,网站维护
服务 - (建议采用1024×768分辨率,以达到最佳视觉效果) Powered by 黑客防线网安 ©2009-2010 www.rongsen.com.cn
作者:黑客防线网安SQL维护基地 来源:黑客防线网安SQL维护基地 浏览次数:0 |
正在作一个关于SQL SERVER数据库导入Excel文件的程序,要读取数据库中的列的信息,从网上找了很多资料,终于总结出来比较理想的sql语句,执行后返回的列分别是:表名、列名、列类型、列长度、列描述、是否主键,语句如下:
1 Select 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,
2 Case When Syscolumns.Name In
3 (Select 主键=A.Name
4 From Syscolumns A
5 Inner Join Sysobjects B On A.Id=B.Id And B.Xtype='U' And B.Name<>'Dtproperties'
6 Where Exists(Select 1 From Sysobjects Where Xtype='Pk' And Name In (
7 Select Name From Sysindexes Where Indid In(
8 Select Indid From Sysindexkeys Where Id = A.Id And Colid=A.Colid
9 )))
10 And B.Name=Sysobjects.Name
11 )
12 Then 1 Else 0 End As Is_key
13
14 From Sysobjects,Systypes,Syscolumns
15 Left Join Sysproperties On (Syscolumns.Id = Sysproperties.Id And
16 Syscolumns.Colid = Sysproperties.Smallid)
17
18 Where (Sysobjects.Xtype ='U' Or Sysobjects.Xtype ='V')
19 And Sysobjects.Id = Syscolumns.Id And Systypes.Xtype = Syscolumns.Xtype
20 And Systypes.Name <> 'Sysname' And Sysobjects.Name Like '%' Order By Sysobjects.Name, Syscolumns.Colid
结果如图:
我要申请本站:N点 | 黑客防线官网 | |
专业服务器维护及网站维护手工安全搭建环境,网站安全加固服务。黑客防线网安服务器维护基地招商进行中!QQ:29769479 |