FieldLength=@FieldLength
-删除表字段
--判断类型
end
ALTER procedure [dbo].[sp_Web_TableFiled_Delete]
set @errorSum=@errorSum+@@error
end
FieldName=@FieldName,
set @sql = 'alter table ' + @TableName +' add ' + @FieldName +' ' + @DataType
FieldName,
as
insert tb_TableField
@FieldExplain varchar(200),
@ConnectTableName,
end
UserSetSign
end
if(@@ERROR>0)
end
EXECUTE sp_updateextendedproperty N'MS_Description', @FieldExplain, N'user', N'dbo', N'Table', @TableName, N'column' , @FieldName;
set @sql = 'alter table ' + @TableName +' add ' + @FieldName +' ' + @DataType +'(' +Convert(varchar,@FieldLength)+')'
FieldLength,
begin
@ID int,
@DataType varchar(100),
select @fname=FieldName from tb_TableField where ID=@ID
--取出tb_PaySystemToLocation的ID
ConnectTableName,
@FieldLength int,
begin transaction mytran
end
(
declare @errorSum int
rollback tran
@FieldName,
select @pstid=ID from tb_PaySystemToLocation where LocationField=@fname
@NewsID int output
declare @fname varchar(100)
delete from tb_TableField where ID=@ID
if(@errorSum>0)
declare @errorSum int
ConnectTableName=@ConnectTableName,
@TableName varchar(100),
DataType=@DataType,
TableName,
begin transaction mytran
DataType,
else
begin
if not exists (SELECT * FROM syscolumns where id=object_id(@TableName) AND name=@FieldName)
else

复制代码 代码如下:

begin
begin
declare @tablename varchar(100)
EXECUTE sp_addextendedproperty N'MS_Description', @FieldExplain, N'user', N'dbo', N'Table', @TableName, N'column' , @FieldName;
end
as
@TableName,
begin
begin
declare @fname varchar(100)
begin

as
set @sql = 'alter table ' + @TableName +' add ' + @FieldName +' ' + @DataType +'(' +Convert(varchar,@FieldLength)+',2'+')'
begin
declare @pstid int
(
set @NewsID=0;
set @errorSum=@errorSum+@@error
@FieldName varchar(100),
@FieldExplain varchar(200),
(
update tb_TableField
rollback tran
commit tran mytran
)
@FieldName varchar(100),
set @NewsID=0;
if(@errorSum>0)
@DataType varchar(100),
--新增表字段
exec(@sql)
commit tran mytran
FieldExplain=@FieldExplain,
)
declare @sql varchar(8000)
if(@DataType='decimal')
select @pstid=ID from tb_PaySystemToLocation where LocationField=@fname
where ID=@ID
set @sql='ALTER TABLE ' +@tablename+ ' DROP COLUMN '+ @fname
set @NewsID=1;
begin
@NewsID int output
@ConnectTableName varchar(100),
)
else
@TableName varchar(100),
set TableName=@TableName,
'1'
)
values
set @NewsID=0;
ALTER procedure [dbo].[sp_Web_TableFiled_Update]
--修改表字段
(
else if(@DataType='varchar')
set @sql = 'sp_rename '+CHAR(39)+@TableName+'.['+@fname+']'+CHAR(39)+',' +char(39)+@FieldName+char(39)+',' + char(39)+'COLUMN' +CHAR(39)
@ID int,
--取出字段名,表名
(
@FieldLength int,
FieldExplain,
rollback tran
end
--再根据字段名称取出tb_PaySystemToLocation中对应的ID
--先取出表中以前的字段名称
else
ALTER procedure [dbo].[sp_Web_TableFiled_Insert]
@DataType,
@ConnectTableName varchar(100),
set @errorSum=@errorSum+@@error
--EXEC sp_updateextendedproperty 'MS_Description',@FieldExplain,'user',dbo,'table',@TableName,'column',@FieldName
)
begin
begin transaction mytran

end
end
declare @pstid int
else
@NewsID int output
declare @errorSum int
begin
@FieldLength,
commit tran mytran
@FieldExplain,
declare @sql varchar(8000)
exec(@sql)
--修改字段说明
exec(@sql)
select @fname=FieldName,@tablename=TableName from tb_TableField where ID=@ID
declare @sql varchar(8000)
end