SQL Server生成数据发布的INSERT语句 - 面向对象网,数据库,mssql,学习,对象 - 面向对象技术开发

面向对象技术开发

会员投稿 投稿指南 站长资讯通告:
您的位置: 首页 > 数据库 > MSSQL > 正文

SQL Server生成数据发布的INSERT语句

来源: www.bianceng.cn 阅读:

【问题】DB结构的发布,SQL Server的管理器可以生成脚本;那么数据如何发布呢?

【思路】生成INSERT INTO ... VALUES...语句

/*-- =============================================  
-- Author:      Yew  
-- Create date: 2012-05-18  
-- Description: 生成数据发布的INSERT脚本  
     
----TestCode---------------------------  
EXEC [TOOL].[Script_Insert]  
     @Schema    = 'COMMON'
    ,@Table     = 'Config'
    ,@Filter    = '[Key] LIKE ''test%'' '
    ,@Field0    = '[Key]'
    ,@Field1    = 'SubKey'
    ,@Field2    = 'Value'
    ,@Field3    = null
    ,@Field4    = null
     
EXEC [TOOL].[Script_Insert]  
     @Schema    = 'COMMON'
    ,@Table     = 'MasterData'
    ,@Filter    = 'Category = ''SheetItem_PreloadType'' '
    ,@Field0    = 'Category'
    ,@Field1    = 'Code'
    ,@Field2    = 'Name'
    ,@Field3    = 'Ord'
    ,@Field4    = null
     
----History---------------------------  
-- =============================================*/  
ALTER PROCEDURE [TOOL].[Script_Insert]  
     @Schema    sysname = 'dbo'
    ,@Table     sysname  
    ,@Filter    sysname = null
    ,@Field0    sysname  
    ,@Field1    sysname = null
    ,@Field2    sysname = null
    ,@Field3    sysname = null
    ,@Field4    sysname = null
AS
BEGIN
    SET NOCOUNT ON;  
     
    -- 0. Define Const  
    DECLARE @NL     varchar(2) --NewLine      
    SET @NL = char(13) + char(10)  
     
    DECLARE @vSql   NVARCHAR(max)  
        ,@objName   sysname  
        ,@fieldList sysname  
     
    -- 1. prepare the statement   
          
    IF @Schema = ''
        SET @Schema = 'dbo'
              
    SET @objName = @Schema + '.' + @Table
          
    SET @vSql = 'SET QUOTED_IDENTIFIER OFF;  
     
SELECT   
"INSERT INTO ' + @objName + '(' + @Field0   
    IF @Field1 IS NOT NULL
        SET @vSql = @vSql + '   ,' + @Field1  
    IF @Field2 IS NOT NULL
        SET @vSql = @vSql + '   ,' + @Field2  
    IF @Field3 IS NOT NULL
        SET @vSql = @vSql + '   ,' + @Field3  
    IF @Field4 IS NOT NULL
        SET @vSql = @vSql + '   ,' + @Field4  
              
    SET @vSql = @vSql + '   )'
        + @NL + 'VALUES(" + QuoteName(' + @Field0 + ', Char(39))'
     
    IF @Field1 IS NOT NULL
        SET @vSql = @vSql + @NL + ' +", " + QuoteName(IsNull(' + @Field1 + ', ""), Char(39))'
    IF @Field2 IS NOT NULL
        SET @vSql = @vSql + @NL + ' +", " + QuoteName(IsNull(' + @Field2 + ', ""), Char(39))'
    IF @Field3 IS NOT NULL
        SET @vSql = @vSql + @NL + ' +", " + QuoteName(IsNull(' + @Field3 + ', ""), Char(39))'
    IF @Field4 IS NOT NULL
        SET @vSql = @vSql + @NL + ' +", " + QuoteName(IsNull(' + @Field4 + ', ""), Char(39))'
     
    SET @vSql = @vSql + @NL + ' +")"'
        + @NL + 'FROM ' + @objName  
    IF @Filter IS NOT NULL
        SET @vSql = @vSql + @NL + 'WHERE ' + @Filter  
                  
    -- 2.run it  
    PRINT @vSql  
    EXEC(@vSql)  
END

【注1】原本一个小工具,也不过花了2个小时,并不值得写篇Blog。但一来,这个工具很多人需要;二来这是今天重感冒下做出来的(当我这篇blog写到一半时,感冒消失了),更显珍贵。

【注2】对于这个‘分享’:

想做:但是我发现新人们大多不太注重编码规范、牛人们不愿意平衡功能与成本,这段代码里面很有些参照价值;

可做:这是个纯粹的工具,不涉及机密;

能做:这个工具足够小,很容易说清楚、看明白。

还请读者们对作品本身发表意见。

本文出自 “叶伟(魔教教主)” 博客,请务必保留此出处http://davyyew.blog.51cto.com/1084625/868414

Tags:
相关文章列表: