删除当前数据库所有表的方法

1. DECLARE tables_cursor CURSOR  
2.    FOR  
3.    SELECT name FROM sysobjects WHERE type = 'U' //选择用户表名  
4. OPEN tables_cursor //打开游标连接  
5.  
6. DECLARE @tablename sysname   // 定义变量  
7. FETCH NEXT FROM tables_cursor INTO @tablename   //结果集中一行一行读取表名  
8. WHILE (@@FETCH_STATUS <> -1) //判断游标状态   
9. BEGIN  
10.  
11.    EXEC ('TRUNECATE TABLE ' + @tablename)   //清空表中的数据  
12.    FETCH NEXT FROM tables_cursor INTO @tablename //下一行数据  
13. END  
14.  
15. DEALLOCATE tables_cursor //关闭游标