SQL查找数据库中所有没有主键的数据表脚本

--SQL查找数据库中所有没有主键的数据表脚本

--运行脚本后在消息中可能会显示下面现象中的一种：
--(1)数据库中所有数据表都有主键(则证明所有数据表都有主键)
--(2)当前数据表[数据表名]没有主键(则可方便找到没主键的数据表)

declare @TableName nvarchar(250)--游标中取出的数据表名
declare @AllTableHasPrimaryKey int--是否全部都有主键
set @AllTableHasPrimaryKey=1
--声明读取数据库所有数据表名和编号的游标
declare mycursor cursor for select name from dbo.SysObjects WHERE OBJECTPROPERTY(ID, 'IsUserTable') = 1 order by name
--打开游标
open mycursor
--从游标里取出数据赋值到我们刚才声明的数据表名变量中
fetch next from mycursor into @TableName
--如果游标执行成功
while (@@fetch_status=0)
begin

--判断当前数据表是否存在主键
IF NOT EXISTS (select * from information_schema.key_column_usage where TABLE_NAME=''+@TableName+'')
begin
set @AllTableHasPrimaryKey=0;
print '当前数据表['+@TableName+']没有主键'
end

--用游标去取下一条记录
fetch next from mycursor into @TableName
end

if(@AllTableHasPrimaryKey=1)
begin
print '数据库中所有数据表都有主键'
end

--关闭游标
close mycursor
--撤销游标
deallocate mycursor
--脚本代码结束

----查询表索引

SELECT

OBJECT_NAME(s.object_id) AS 表名,

COUNT(1) AS 唯一索引数量

FROM sys.indexes s

WHERE is_unique = 1

GROUP BY s.object_id

-----查询表table1的主键字段和索引

Declare @table_name varchar(100)
Set @table_name='table1'
--1、可以根据系统存储过程
Execute sp_pkeys @table_name

--2、根据系统表获得
Declare @objectid int
Set @objectid=object_id(@table_name)
Select
col_name(@objectid,colid) '主键字段'
From sysobjects as o
Inner Join sysindexes as i On i.name=o.name
Inner Join sysindexkeys as k On k.indid=i.indid
Where
o.xtype = 'PK' and parent_obj=@objectid and k.id=@objectid

--简易版查询所有主键为空的表

SELECT TableName = O.Name FROM sys.objects O WHERE o.name NOT IN ( SELECT o2.name FROM sysobjects o1 JOIN sysobjects o2 ON o1.parent_obj = o2.id AND o1.xtype = 'pk' ) AND O.type = 'U'