SQL清空以TB开头表中的数据

exec sp_msforeachtable 'alter table ? nocheck CONSTRAINT all'  
exec sp_msforeachtable 'ALTER TABLE ? DISABLE TRIGGER all'   
--从系统表中读取TB开头的表名之后逐条删除
Declare @name varchar(100)
Declare TbNameCur CURSOR FOR
select name from sysobjects where XType='U' and name like 'TB%'
OPEN TbNameCur
FETCH NEXT FROM TbNameCur INTO @name 
 WHILE @@FETCH_STATUS=0 --语句执行成功  
  begin  
    --更新学生表中的记录  
    exec ('delete from '+@name)
    FETCH NEXT FROM TbNameCur INTO @name  
    end  
    --关闭并释放游标  
    CLOSE TbNameCur    
    DEALLOCATE TbNameCur 

 --启用触发器和约束   
exec sp_msforeachtable 'alter table ? check constraint all'  
exec sp_msforeachtable 'ALTER TABLE ? enable TRIGGER all'