在asp中如何创建动态表--调用如下sp_execute

2008-02-23 05:26:13来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

/* -----------------------------------
产生论坛分类目录内容表过程

----------------------------------- */
CREATE PROCEDURE sp_createnew_bbscontent
@tabname varchar(200)='',
@boardid int
AS
declare @tri_inst_name nvarchar(100)
declare @tri_up_name nvarchar(100)
declare @tri_del_name nvarchar(100)
declare @deltab nvarchar(100)
declare @st nvarchar(2000)
select @tri_inst_name='inst_bbsContent' LTRIM(RTRIM(str(@Boardid)))
select @tri_up_name='up_bbsContent' LTRIM(RTRIM(str(@Boardid)))
select @tri_del_name='delete_bbsContent' LTRIM(RTRIM(str(@Boardid)))
select @deltab='drop table ' @tabname
if len(@tabname)=0
return
if exists (select * from sysobjects where id = object_id(@tabname) and OBJECTPROPERTY(id, N'IsUserTable') = 1)
exec sp_executesql @deltab

select @st='CREATE TABLE ' @tabname
'(
AnnounceID int identity (1, 1) NOT NULL ,
ParentID int default (0) NULL ,
Child int default (0) NULL ,
User_id int NULL ,
boardID int NULL ,
Topic nvarchar (255) NULL ,
Body ntext NULL ,
DateAndTime datetime default (getdate()) NULL ,
Hits int default (0) NULL ,
Length int default (0) NULL ,
RootID int default (0) NULL ,
Layer tinyint default (1) NULL ,
Orders int default (0) NULL ,
Ip nvarchar (20) default (0) NULL ,
Expression nvarchar (50) NULL ,
Forbid tinyint default(0) NULL
)'
exec sp_executesql @st

select @st='CREATE TRIGGER ' @tri_inst_name ' ON ' @tabname '
FOR INSERT
AS
declare @rid integer,@pid integer
select @pid=ParentId from inserted
if @pid = 0
begin
select @rid =@@identity
update ' @tabname ' set rootid=@rid where AnnounceID=@rid
end'
exec sp_executesql @st

select @st='CREATE TRIGGER ' @tri_up_name ' ON ' @tabname '
FOR UPDATE
AS

declare @pid int ,@rid int,@forbid tinyint
if update(forbid)
begin
select @pid = parentid,@rid = rootid,@forbid=forbid from inserted
/* 如果其父没有开放 则不能开放 */
if exists ( select * from ' @tabname ' where AnnounceID = @pid and Forbid!= 0 )
begin
rollback transaction
return
end
update ' @tabname ' set forbid=@forbid where rootid=@rid and parentid>@pid
end'
exec sp_executesql @st

select @st='CREATE TRIGGER ' @tri_del_name ' ON ' @tabname '
FOR DELETE
AS
declare @pid int ,@rid int
select @pid = parentid,@rid = rootid from deleted
delete from ' @tabname ' where rootid=@rid and parentid>@pid'

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:fso的一些特殊功能

下一篇:使用NextRecordset通过一个Connection输出多个select查询