为表添加和删除字段的存储过程

SQLserver:FuncADDColumn(为表添加字段)。

用于为表添加字段。可以侦测表中有没有这字段。
如果没有，添加该字段。

/*
author:nyb
time :2003/12/29
fixtime :
aim   :看表中是否有这个字段，如果没有，添加上
input :
调用：
execute FuncADDColumn ’a’,’c’,’int’
execute FuncADDColumn ’a’,’ddd’,’varchar(100)’
*/
CREATE   PROCEDURE FuncADDColumn
@tablename varchar(128), -- 表名
@Columnname varchar(128),---列名
@ColumnType varchar(128) -- 列定义

as
set @tablename = ltrim(rtrim(@tablename))
set @Columnname = ltrim(rtrim(@Columnname))
set @ColumnType = ltrim(rtrim(@ColumnType))

declare @string varchar(8000)

IF not EXISTS( select * from syscolumns where id=object_id(@tablename) and name = @Columnname )
begin
select @string =’ ALTER TABLE ’+ @tablename + ’ ADD [’ + ltrim(rtrim(@Columnname)) + ’] ’ + @ColumnType + ’ null’
print @string
execute(@string)
end

GO

FuncDropColumn（为表删除某字段）。

自动侦测表中有没有该字段，既可以避免删除出错，也可以提高程序的灵活性。

/*
author:nyb
time :2003/12/29
fixtime :
aim   :看表中是否有这个字段，如果有，删除
input :
调用：

execute FuncDropColumn ’PSZ31’,’Z31No’
*/
CREATE   PROCEDURE FuncDropColumn
@tablename varchar(128), --表名
@Columnname varchar(128)--列名

as
set @tablename = ltrim(rtrim(@tablename))
set @Columnname = ltrim(rtrim(@Columnname))

declare @string varchar(8000)

IF EXISTS( select * from syscolumns where id=object_id(@tablename) and name = @Columnname )
begin
select @string =’ ALTER TABLE ’+ @tablename + ’ DROP COLUMN [’ + ltrim(rtrim(@Columnname)) + ’]’
print @string
execute(@string)
end

GO