declare cursor1 cursor for select d.name,a.name name1,b.name name2,a.length,a.isnullable from syscolumns a, systypes b,sysobjects d where a.xtype=b.xusertype and a.id=d.id and d.xtype='U' and b.name like '%char'
declare @a varchar(1000),@b varchar(1000),@c varchar(1000),@d int,@e int,@sql varchar(8000)
open cursor1
fetch cursor1 into @a,@b,@c,@d,@e
while @@fetch_status=0
begin
set @sql='ALTER TABLE '+@a+' ALTER COLUMN '+@b+' '+@c+'('+cast(@d as varchar(10))+') COLLATE Chinese_PRC_CI_AS '+case when @e=1 then 'null' else 'not null' end
fetch cursor1 into @a,@b,@c,@d,@e
end
close cursor1
deallocate cursor1
从系统表:syscolumns中找出你要所有要修改的字段,
循环:
动态执行alter table .. alter column .......
一定读出字段类型,参考下面的脚本.
-----------------------
alter table 表名 alter column 字段名 类型 collate ....
-----------------------------------
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