SQL SERVER编写存储过程小工具

2016-02-19 09:51 4 1 收藏

下面是个SQL SERVER编写存储过程小工具教程,撑握了其技术要点,学起来就简单多了。赶紧跟着图老师小编一起来看看吧!

【 tulaoshi.com - Web开发 】

在开发数据库系统的过程中,经常要写很多的存储过程。为了统一格式和简化开发过程,我编写一些存储过程,用来自动生成存储过程。下面就为您简单介绍一下它们。其中一个用于生成Insert过程,另一个用于生成Update过程。 


Sp_GenInsert 

该过程运行后,它为给定的表生成一个完整的Insert过程。如果原来的表有标识列,您得将生成的过程中的SET IDNTITY_INSERT ON 语句手工删除。 

语法如下 

sp_GenInsert  Table Name , Stored Procedure Name  

以northwind 数据库为例 

sp_GenInsert 'Employees', 'INS_Employees' 

最后会生成一个Insert存储过程。利用它,您可以作进一步的开发。 


Sp_GenUpdate 

它会为一个表生成update存储过程。语法如下: 

sp_GenUpdate  Table Name , Primary Key , Stored Procedure Name  

以northwind 数据库为例 

sp_GenUpdate 'Employees','EmployeeID','UPD_Employees' 

运行后生成如下所示的存储过程: 

Create Procedure UPD_Employees 

@EmployeeID int 

@LastName nvarchar(40) , 

@FirstName nvarchar(20) , 

@Title nvarchar(60) , 

@TitleofCourtesy nvarchar(50) , 

@BirthDate datetime , 

@HireDate datetime , 

@Address nvarchar(120) , 

@City nvarchar(30) , 

@Region nvarchar(30) , 

@PostalCode nvarchar(20) , 

@Country nvarchar(30) , 

@HomePhone nvarchar(48) , 

@Extension nvarchar(8) , 

@Phote image , 

@Notes ntext , 

@ReportsTo int , 

@PhotoPath nvarchar(510) 

AS 

UPDATE Employees 

SET 

LastName = @LastName, 

FirstName = @FirstName, 

Title = @Title, 

TitleofCourtesy = @TitleofCourtesy, 

BirthDate = @BirthDate, 

HireDate = @HireDate, 

Address = @Address, 

City = @City, 

Regin = @Regin, 

PostalCode = @PostCode, 

Country = @Country, 

HomePhone = @HomePhone, 

Extension = @Extension, 

Photo = @Photo 

Notes = @Notes, 

ReportsTo = @ReportsTo, 

PhotoPath = @PhotoPath 

WHERE EmployeeID = @EmployeeID 


使用以上的两个存储过程,节省了我不少时间。特别是在改变了表结构后,重新构造各个存储过程的过程中。您可以改写这两个程序,来自动生成别的存储过程。

SQL Server编写存储过程小工具
以下是两个存储过程的源程序
/*===========================================================

语法: sp_GenInsert Table Name,Stored Procedure Name
以northwind 数据库为例
sp_GenInsert 'Employees', 'INS_Employees'

注释:如果您在Master系统数据库中创建该过程,那您就可以在您服务器上所有的数据库中使用该过程。

=============================================================*/

CREATE procedure sp_GenInsert
@TableName varchar(130),
@ProcedureName varchar(130)
as
set nocount on

declare @maxcol int,
@TableID int
--itlearner.com
set @TableID = object_id(@TableName)

select @MaxCol = max(colorder)
from syscolumns
where id = @TableID

select 'Create Procedure ' + rtrim(@ProcedureName) as type,0 as colorder into #TempProc
union
select convert(char(35),'@' + syscolumns.name)
+ rtrim(systypes.name)
+ case when rtrim(systypes.name) in ('binary','char','nchar','nvarchar','varbinary','varchar') then '(' + rtrim(convert(char(4),syscolumns.length)) + ')'
when rtrim(systypes.name) not in ('binary','char','nchar','nvarchar','varbinary','varchar') then ' '
end
+ case when colorder @maxcol then ','
when colorder = @maxcol then ' '
end
as type,
colorder
from syscolumns
join systypes on syscolumns.xtype = systypes.xtype
where id = @TableID and systypes.name 'sysname'
union
select 'AS',@maxcol + 1 as colorder
union
select 'INSERT INTO ' + @TableName,@maxcol + 2 as colorder
union
select '(',@maxcol + 3 as colorder
union
select syscolumns.name
+ case when colorder @maxcol then ','
when colorder = @maxcol then ' '
end
as type,
colorder + @maxcol + 3 as colorder
from syscolumns
join systypes on syscolumns.xtype = systypes.xtype
where id = @TableID and systypes.name 'sysname'
union
select ')',(2 * @maxcol) + 4 as colorder
union
select 'VALUES',(2 * @maxcol) + 5 as colorder
union
select '(',(2 * @maxcol) + 6 as colorder
union
select '@' + syscolumns.name
+ case when colorder @maxcol then ','
when colorder = @maxcol then ' '
end
as type,
colorder + (2 * @maxcol + 6) as colorder
from syscolumns
join systypes on syscolumns.xtype = systypes.xtype
where id = @TableID and systypes.name 'sysname'
union
select ')',(3 * @maxcol) + 7 as colorder
order by colorder

select type from #tempproc order by colorder

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/webkaifa/)

drop table #tempproc

SQL Server编写存储过程小工具
功能:为给定表创建Update存储过程
语法: sp_GenUpdate Table Name,Primary Key,Stored Procedure Name
以northwind 数据库为例
sp_GenUpdate 'Employees','EmployeeID','UPD_Employees'

注释:如果您在Master系统数据库中创建该过程,那您就可以在您服务器上所有的数据库中使用该过程。

===========================================================*/
CREATE procedure sp_GenUpdate
@TableName varchar(130),
@PrimaryKey varchar(130),
@ProcedureName varchar(130)
as
set nocount on

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/webkaifa/)

declare @maxcol int,
@TableID int
--itlearner.com
set @TableID = object_id(@TableName)

select @MaxCol = max(colorder)
from syscolumns
where id = @TableID

select 'Create Procedure ' + rtrim(@ProcedureName) as type,0 as colorder into #TempProc
union
select convert(char(35),'@' + syscolumns.name)
+ rtrim(systypes.name)
+ case when rtrim(systypes.name) in ('binary','char','nchar','nvarchar','varbinary','varchar') then '(' + rtrim(convert(char(4),syscolumns.length)) + ')'
when rtrim(systypes.name) not in ('binary','char','nchar','nvarchar','varbinary','varchar') then ' '
end
+ case when colorder @maxcol then ','
when colorder = @maxcol then ' '
end
as type,
colorder
from syscolumns
join systypes on syscolumns.xtype = systypes.xtype
where id = @TableID and systypes.name 'sysname'
union
select 'AS',@maxcol + 1 as colorder
union
select 'UPDATE ' + @TableName,@maxcol + 2 as colorder
union
select 'SET',@maxcol + 3 as colorder
union
select syscolumns.name + ' = @' + syscolumns.name
+ case when colorder @maxcol then ','
when colorder = @maxcol then ' '
end
as type,
colorder + @maxcol + 3 as colorder
from syscolumns
join systypes on syscolumns.xtype = systypes.xtype
where id = @TableID and syscolumns.name @PrimaryKey and systypes.name 'sysname'
union
select 'WHERE ' + @PrimaryKey + ' = @' + @PrimaryKey,(2 * @maxcol) + 4 as colorder
order by colorder

select type from #tempproc order by colorder

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/webkaifa/)

drop table #tempproc
/*=======源程序结束=========*/

来源:http://www.tulaoshi.com/n/20160219/1592378.html

延伸阅读
标签: SQLServer
if exists(select name from sysobjects where name='GetRecord' and type = 'p')    drop procedure GetRecord GO create procedure GetRecord @id int output,              --输出p_id和p_path @path nvarchar(255) output as select top 1 @id = p_id, @path ...
标签: SQLServer
  SQLSERVER估计是为了安装或者其它方面,它内置了一批危险的存储过程。能读到注册表信息,能写入注册表信息,能读磁盘共享信息等等……各位看到这儿,心里可能会在想,我的网站中有其它的代码,又不像查询分析器那样能直接将结果输出。给你这个权限,也不能怎么样,还是看不到信息。如果各位这样想就大错特错了。提示一下,如果攻击...
--有输入参数的存储过程--create proc GetComment(@commentid int)asselect * from Comment where CommentID=@commentid --有输入与输出参数的存储过程--create proc GetCommentCount@newsid int,@count int outputasselect @count=count(*) from Comment where NewsID=@newsid --返回单个值的函数--create function MyFunction(@newsid int)...
标签: ASP
  建立表: CREATE TABLE [TestTable] ( [ID] [int] IDENTITY (1, 1) NOT NULL , [FirstName] [nvarchar] (100) COLLATE Chinese_PRC_CI_AS NULL , [LastName] [nvarchar] (100) COLLATE Chinese_PRC_CI_AS NULL , [Country] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [Note] [nvarchar] (2000) COLLATE Chinese_PRC_CI_...
标签: SQLServer
  存储过程、存储函数的加密:WITH ENCRYPTION <!--[if !supportLineBreakNewLine]-- <!--[endif]-- CREATE procedure dbo.sp_XML_main @table_name nvarchar(260)='', @dirname nvarchar(20)='' WITH ENCRYPTION as begin .................................................... end go     存储过程、存...

经验教程

28

收藏

83
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部