删除指定类型的所有字段

--要删除的列的数据类型
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'?'