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
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
