数据库

本类阅读TOP10

·SQL语句导入导出大全
·SQL Server日期计算
·SQL语句导入导出大全
·SQL to Excel 的应用
·Oracle中password file的作用及说明
·MS SQLServer OLEDB分布式事务无法启动的一般解决方案
·sqlserver2000数据库置疑的解决方法
·一个比较实用的大数据量分页存储过程
·如何在正运行 SQL Server 7.0 的服务器之间传输登录和密码
·SQL中两台服务器间使用连接服务器

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
一段优化排序的Sql语句

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[OrderOptimize]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[OrderOptimize]
GO

SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS OFF
GO

CREATE Procedure OrderOptimize

(
@ID int,
@intOrder int,
@TableName varchar(50)
)
AS


BEGIN TRANSACTION TransOrderOptimize

Declare @SqlStr nvarchar(500)
Declare @i int
Declare @CursorSql nvarchar (500)
Declare @UpdateOrder nvarchar(500)
declare @TempId int
--declare @CursorName varchar(50)
--print(N' update '+cast(@TableName as varchar(50))+'  set intOrder = '''+cast(@intOrder as int)+'''   where ID='''+@ID+'''');
begin
 
 set @SqlStr=N' update '+cast(@TableName as varchar(50))+' set intOrder = '''+cast(@intOrder as varchar(50))+''' where ID='''+cast(@ID as varchar(10))+'''';

exec sp_executesql @SqlStr;
end

Begin
 set nocount on
 set @i=0;
 --set @CursorName='product';
 --set @SqlTemp=N'select ID from '+cast(@TableName as varchar(50))+' ORDER BY intOrder';
 --declare Order_Cursor cursor for sp_executesql @SqlTemp

 declare @temp nvarchar(500)
 set @temp =N'declare Order_Cursor cursor for select  ID from '+cast(@TableName as varchar(50))+'  ORDER BY intOrder'
 exec sp_executesql  @temp

 open Order_Cursor
 fetch next from Order_Cursor into @TempId

 while @@FETCH_STATUS=0
 Begin
  --print @TempId;
  set @i=@i+1;
  set @UpdateOrder=N'Update '+cast(@TableName as varchar(50))+'  Set intOrder='''+cast(@i as varchar(10))+''' where ID='''+cast(@TempId as varchar(10))+'''';
  --print @UpdateOrder;
  execute sp_executesql @UpdateOrder
  fetch next from Order_Cursor into @TempId
 End

 CLOSE Order_Cursor
 DEALLOCATE Order_Cursor
End


if @@error<>0
 Begin
 raiserror('排序优化失败,请与开发商联系!',16,1)
 RollBack Transaction TransOrderOptimize
 Return 99
end

Commit Transaction TransOrderOptimize
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

 




相关文章

相关软件