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

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

/*
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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!