用2005生成2000格式的存储过程sql
时间:2010-09-20 来源:umen
--delete test.dbo.Table_1
--test.dbo.Table_1 是存需要导出存储过程的列表
declare @strColName as varchar(50)
Declare Cur_NewTable Cursor
For
Select a from test.dbo.Table_1
Open Cur_NewTable
While 1 = 1
Begin
Fetch Next From Cur_NewTable Into
@strColName
IF NOT (@@FETCH_STATUS = 0)
Break
Set @strColName=LTrim(@strColName)
Set @strColName=RTrim(@strColName)
print 'SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO'
print 'if exists (select * from dbo.sysobjects where id = object_id(N''[dbo].['+@strColName+']'') and OBJECTPROPERTY(id, N''IsProcedure'') = 1)'
print 'drop procedure [dbo].['+ @strColName +']'
print 'go'
EXEC Sp_HelpText @strColName
print 'GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO'
End
Close Cur_NewTable
DeAllocate Cur_NewTable
--EXEC Sp_HelpText 'sGetTxNo'