怎样删除数据库中父结点及所有子结点

Question

--这个是查询的 
create table tb(id varchar(3) , pid varchar(3) , name varchar(10)) 
insert into tb values('001' , null  , '广东省') 
insert into tb values('002' , '001' , '广州市') 
insert into tb values('003' , '001' , '深圳市') 
insert into tb values('004' , '002' , '天河区') 
insert into tb values('005' , '003' , '罗湖区') 
insert into tb values('006' , '003' , '福田区') 
insert into tb values('007' , '003' , '宝安区') 
insert into tb values('008' , '007' , '西乡镇') 
insert into tb values('009' , '007' , '龙华镇') 
insert into tb values('010' , '007' , '松岗镇') 
go --查询指定节点及其所有子节点的函数 
create function f_cid(@ID varchar(3)) returns @t_level table(id varchar(3) , level int) 
as 
begin 
  declare @level int 
  set @level = 1 
  insert into @t_level select @id , @level 
  while @@ROWCOUNT > 0 
  begin 
    set @level = @level + 1 
    insert into @t_level select a.id , @level 
    from tb a , @t_Level b 
    where a.pid = b.id and b.level = @level - 1 
  end 
  return 
end 
go --调用函数查询001(广东省)及其所有子节点 
select a.* from tb a , f_cid('001') b where a.id = b.id order by a.id 
/* 
id  pid  name      
---- ---- ---------- 
001  NULL 广东省 
002  001  广州市 
003  001  深圳市 
004  002  天河区 
005  003  罗湖区 
006  003  福田区 
007  003  宝安区 
008  007  西乡镇 
009  007  龙华镇 
010  007  松岗镇 （所影响的行数为 10 行） 
*/ --调用函数查询002(广州市)及其所有子节点 
select a.* from tb a , f_cid('002') b where a.id = b.id order by a.id 
/* 
id  pid  name      
---- ---- ---------- 
002  001  广州市 
004  002  天河区 （所影响的行数为 2 行） 
*/ --调用函数查询003(深圳市)及其所有子节点 
select a.* from tb a , f_cid('003') b where a.id = b.id order by a.id 
/* 
id  pid  name      
---- ---- ---------- 
003  001  深圳市 
005  003  罗湖区 
006  003  福田区 
007  003  宝安区 
008  007  西乡镇 
009  007  龙华镇 
010  007  松岗镇 （所影响的行数为 7 行） 
*/ drop table tb 
drop function f_cid

Answer 1

if object_id('[tb]') is not null drop table [tb] 
 go 
create table [tb]([ID] int,[code] int,[pcode] int)
insert [tb] select 1,1111,-1
union all select 2,2222,1111
union all select 3,3333,1111
union all select 4,4444,2222
union all select 5,5555,3333
union all select 6,6666,4444
go
;with t as
(
  select code,pcode from tb where code=3333 --要删除的code
  union all 
  select b.code,b.pcode from t a,tb b where a.code=b.pcode
)
delete a 
from tb a 
where exists(select 1 from t where code=a.code)
--查询结果
select * from tb
/*
ID          code        pcode
----------- ----------- -----------
1           1111        -1
2           2222        1111
4           4444        2222
6           6666        4444(4 行受影响)
*/

Answer 2

--递归删除父节点及所有子节点
create table tb(Id int, ParentId int, Name varchar(5))
insert into tb select 1, 0, 'a1' 
union all select 2,2, 'a2' 
union all select 14, 1, 'b11' 
union all select 15, 1, 'b12' 
union all select 16, 14, 'c13' 
union all select 17, 14, 'c14'
union all select 104,17,'d15'
go
WITH temptab(id, parentid, name) AS
   (    SELECT root.id, root.parentid, root.name
            FROM tb root
            WHERE id=1
     UNION ALL
        SELECT sub.id, sub.parentid, sub.name
            FROM tb sub, temptab super
            WHERE sub.parentid = super.id
   )
delete from tb where id in(
select id from temptab
)
select * from tb
go 
drop table tb 
/*
Id          ParentId    Name
----------- ----------- -----
2           2           a2
*/

Answer 3

我的是SQL2000,不能用WITH,用什么替代啊?哈哈