遍历所有用户表，把没有主键，但有标示列的表，把其标示列设为主键，如何做？

[IntoPython]

遍历所有用户表，把没有主键，但有标示列的表，把其标示列设为主键，请指教！

[CrazyFor]

SELECT
(case when a.colorder=1 then d.name else '' end) N'表名',
a.colorder N'字段序号',
a.name N'字段名',
(case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) N'标识',
(case when (SELECT count(*)
FROM sysobjects
WHERE (name in
(SELECT name
FROM sysindexes
WHERE (id = a.id) AND (indid in
(SELECT indid
FROM sysindexkeys
WHERE (id = a.id) AND (colid in
(SELECT colid
FROM syscolumns
WHERE (id = a.id) AND (name = a.name))))))) AND
(xtype = 'PK'))>0 then '√' else '' end) N'主键',
b.name N'类型',
a.length N'占用字节数',
COLUMNPROPERTY(a.id,a.name,'PRECISION') as N'长度',
isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0) as N'小数位数',
(case when a.isnullable=1 then '√'else '' end) N'允许空',
isnull(e.text,'') N'默认值',
isnull(g.[value],'') AS N'字段说明'
into #tx

FROM syscolumns a left join systypes b
on a.xtype=b.xusertype
inner join sysobjects d
on a.id=d.id and d.xtype='U' and d.name<>'dtproperties'
left join syscomments e
on a.cdefault=e.id
left join sysproperties g
on a.id=g.id AND a.colid = g.smallid
order by object_name(a.id),a.colorder


select * from #TX where 主键<>'√' and 标识='√'

再参考下面语句加主键.

ALTER TABLE 表名 ADD CONSTRAINT
主键名 PRIMARY KEY CLUSTERED
(
字段名
) ON [PRIMARY]

[pengdali]

declare cursor1 cursor for select a.name,rtrim(b.name) colname from sysobjects a,syscolumns b left outer join (select g.id,g.colid from sysindexes f,sysindexkeys g where f.id = g.id and f.indid = g.indid and f.indid > 0 and f.indid < 255 and (f.status & 2048)<>0) h on b.id = h.id and b.colid = h.colid where a.id = b.id and h.id is null and COLUMNPROPERTY( b.id,b.name,'IsIdentity')=1
declare @i varchar(1000),@j varchar(1000)
open cursor1
fetch cursor1 into @i,@j
while @@fetch_status=0
begin
exec('alter table '+@i+' add constraint pk_'+@i+'_'+@j+' primary key ('+@j+')')
fetch cursor1 into @i,@j
end
close cursor1
deallocate cursor1

[pengdali]

declare cursor1 cursor for select a.name,rtrim(b.name) colname from sysobjects a,syscolumns b left outer join (select g.id,g.colid from sysindexes f,sysindexkeys g where f.id = g.id and f.indid = g.indid and f.indid > 0 and f.indid < 255 and (f.status & 2048)<>0) h on b.id = h.id and b.colid = h.colid where a.id = b.id and h.id is null and COLUMNPROPERTY( b.id,b.name,'IsIdentity')=1
declare @i varchar(1000),@j varchar(1000)
open cursor1
fetch cursor1 into @i,@j
while @@fetch_status=0
begin
exec('alter table '+@i+' add constraint pk_'+@i+'_'+@j+' primary key ('+@j+')')
fetch cursor1 into @i,@j
end
close cursor1
deallocate cursor1

[IntoPython]

这个方法对不对
打开记录集1

select id, name from sysObjects where type='u' and name<>'dtproperties' order by name

循环记录集1打开记录集2
select indid from sysindexkeys where id=记录集1id and indid=1

如果记录集2没有记录说明记录集1标示的表没有主键，对不对？？

[pengdali]

我测过了

declare cursor1 cursor for select a.name,b.name from sysobjects a,syscolumns b where a.id = b.id and COLUMNPROPERTY( b.id,b.name,'IsIdentity')=1 and a.id not in (select a.id from sysobjects a,syscolumns b join (select g.id,g.colid from sysindexes f,sysindexkeys g where f.id = g.id and f.indid = g.indid and f.indid > 0 and f.indid < 255 and (f.status & 2048)<>0) h on b.id = h.id and b.colid = h.colid where a.id = b.id)
declare @i varchar(1000),@j varchar(1000)
open cursor1
fetch cursor1 into @i,@j
while @@fetch_status=0
begin
exec('alter table '+@i+' add constraint pk_'+@i+'_'+@j+' primary key ('+@j+')')
fetch cursor1 into @i,@j
end
close cursor1
deallocate cursor1