删除所有的用户表，存储过程，游标的应用，动态SQL的使用

--存储过程，删除某数据库中所有的用户表，游标的应用，动态SQL的使用
--思路：先删除所有的外键，再删除所有的表；以免外键的存在导致不能删表
--sys.objects表中parent_object_id表示某对象所依附的对象的ID，如外键所在表的ID
--sys.foreign_keys表中有所有外键的信息，也有parent_object_id属性
create database test
go
use test

go
create proc dropAllUserTable as
begin
	--声明游标，获得外键的名字及其所在的表的对象ID，
	--sys.objects中type in ['F','U']分别表示外键及用户表
	declare cursorForeignKey cursor for 
		select [name], parent_object_id from sys.objects where [type]='F'
	open cursorForeignKey
	declare @fkName nvarchar(30), @objId int, @tn nvarchar(30)
	--提取外键的名字及其所在的表的对象ID到变量@fkName, @objId中
	fetch next from cursorForeignKey into @fkName, @objId
	while @@fetch_status=0 --删除所有的外键
	begin		
		select @tn=[name] from sys.objects where [object_id]= @objId
		set @tn=quotename(@tn)
		exec('alter table ' + @tn + ' drop constraint ' + @fkName)
		fetch next from cursorForeignKey into @fkName, @objId
	end
	close cursorForeignKey
	deallocate cursorForeignKey

	declare cursorTableName cursor for 
		select [name] from sys.objects where type='U'
	open cursorTableName	
	
	fetch next from cursorTableName into @tn	
	while @@fetch_status=0 --删除所有的表
	begin
		set @tn=quotename(@tn)		
		exec ('drop table ' + @tn)
		fetch next from cursorTableName into @tn
	end
	close cursorTableName
	deallocate cursorTableName
end

go
--测试，a，b两表相互参照
create table a(a int primary key, b int)
create table b(a int primary key, b int references a(a))
alter table a add foreign key(b) references b(a)

--drop table a,b --出错！

exec dropAllUserTable --调用存储过程，删除所有用户表