235.删除指定类型的所有字段

--要删除的列的数据类型
DECLARE @fieldtype sysname
SET @fieldtype='varchar'

--删除处理
DECLARE hCForEach CURSOR GLOBAL
FOR
SELECT N'ALTER TABLE '+QUOTENAME(o.name)
	+N' DROP COLUMN '+QUOTENAME(c.name)
FROM sysobjects o,syscolumns c,systypes t
WHERE o.id=c.id 
	AND OBJECTPROPERTY(o.id,N'IsUserTable')=1
	AND c.xusertype=t.xusertype
	AND t.name=@fieldtype
EXEC sp_MSforeach_Worker @command1=N'?'