• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>

    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>

            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            

    
            

            




            







												


        


            


            牽著老婆滿街逛
            

            嚴以律己,寬以待人. 三思而后行.
            
GMail/GTalk: yanglinbo#google.com;
            
MSN/Email: tx7do#yahoo.com.cn;
            
QQ: 3 0 3 3 9 6 9 2 0 .
            

            




            
	
					
	
            
		
            
			破解SQL2000的存儲過程的存儲過程
		
            
		
            SET ANSI_NULLS ON
            SET QUOTED_IDENTIFIER ON
            GO

            ALTER   PROCEDURE [sp_decrypt](@objectName varchar(50))
            AS
            BEGIN
            SET nocount ON

            --CSDN：j9988 copyright:2004.04.15 
            --            V3.1 
            --            破解字節不受限制，適用于SQLSERVER2000存儲過程，函數，視圖，觸發器
            --            修正上一版視圖觸發器不能正確解密錯誤
            --            發現有錯，請E_MAIL：CSDNj9988@tom.com
            BEGIN TRAN
            DECLARE @objectname1 varchar(100),@orgvarbin varbinary(8000)
            DECLARE @sql1 nvarchar(4000),@sql2 varchar(8000),@sql3 nvarchar(4000),@sql4 nvarchar(4000)
            DECLARE  @OrigSpText1 nvarchar(4000),  @OrigSpText2 nvarchar(4000) , @OrigSpText3 nvarchar(4000), @resultsp nvarchar(4000)
            DECLARE  @i int,@status int,@type varchar(10),@parentid int
            DECLARE @colid int,@n int,@q int,@j int,@k int,@encrypted int,@number int
            SELECT @type=xtype,@parentid=parent_obj FROM sysobjects where id=object_id(@ObjectName)

            CREATE TABLE  #temp(number int,colid int,ctext varbinary(8000),encrypted int,status int)
            INSERT #temp SELECT number,colid,ctext,encrypted,status FROM syscomments  WHERE id = object_id(@objectName)
            SELECT @number=max(number) FROM #temp
            SET @k=0

            WHILE @k<=@number 
            BEGIN
            IF EXISTS(SELECT 1 FROM syscomments WHERE id=object_id(@objectname) AND number=@k)
            BEGIN
            IF @type='P'
            SET @sql1=(CASE WHEN @number>1 THEN 'ALTER PROCEDURE '+ @objectName +';'+rtrim(@k)+' WITH ENCRYPTION AS '
                                                  ELSE 'ALTER PROCEDURE '+ @objectName+' WITH ENCRYPTION AS '
                                                  END)

            IF @type='TR'
            begin
            declare @parent_obj varchar(255),@tr_parent_xtype varchar(10)
            select @parent_obj=parent_obj from sysobjects where id=object_id(@objectName)
            select @tr_parent_xtype=xtype from sysobjects where id=@parent_obj
            if @tr_parent_xtype='V'
            begin
            set @sql1='ALTER TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION INSTERD OF INSERT AS PRINT 1 '
            end
            else
            begin
            set @sql1='ALTER TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION FOR INSERT AS PRINT 1 '
            end

            end
            if @type='FN' or @type='TF' or @type='IF'
            set @sql1=(case @type when 'TF' then 
            'ALTER FUNCTION '+ @objectName+'(@a char(1)) returns @b table(a varchar(10)) with encryption as begin insert @b select @a return end '
            when 'FN' then
            'ALTER FUNCTION '+ @objectName+'(@a char(1)) returns char(1) with encryption as begin return @a end'
            when 'IF' then
            'ALTER FUNCTION '+ @objectName+'(@a char(1)) returns table with encryption as return select @a as a'
            end)

            if @type='V'
            set @sql1='ALTER VIEW '+@objectname+' WITH ENCRYPTION AS SELECT 1 as f'

            set @q=len(@sql1)
            set @sql1=@sql1+REPLICATE('-',4000-@q)
            select @sql2=REPLICATE('-',8000)
            set @sql3='exec(@sql1'
            select @colid=max(colid) from #temp where number=@k 
            set @n=1
            while @n<=CEILING(1.0*(@colid-1)/2) and len(@sQL3)<=3996
            begin 
            set @sql3=@sql3+'+@'
            set @n=@n+1
            end
            set @sql3=@sql3+')'
            exec sp_executesql @sql3,N'@Sql1 nvarchar(4000),@ varchar(8000)',@sql1=@sql1,@=@sql2

            end
            set @k=@k+1
            end

            set @k=0
            while @k<=@number 
            begin

            if exists(select 1 from syscomments where id=object_id(@objectname) and number=@k)
            begin
            select @colid=max(colid) from #temp where number=@k 
            set @n=1

            while @n<=@colid
            begin
            select @OrigSpText1=ctext,@encrypted=encrypted,@status=status FROM #temp  WHERE colid=@n and number=@k

            SET @OrigSpText3=(SELECT ctext FROM syscomments WHERE id=object_id(@objectName) and colid=@n and number=@k)
            if @n=1
            begin
            if @type='P'
            SET @OrigSpText2=(case when @number>1 then 'CREATE PROCEDURE '+ @objectName +';'+rtrim(@k)+' WITH ENCRYPTION AS '
                                               else 'CREATE PROCEDURE '+ @objectName +' WITH ENCRYPTION AS '
                                               end)


            if @type='FN' or @type='TF' or @type='IF'
            SET @OrigSpText2=(case @type when 'TF' then 
            'CREATE FUNCTION '+ @objectName+'(@a char(1)) returns @b table(a varchar(10)) with encryption as begin insert @b select @a return end '
            when 'FN' then
            'CREATE FUNCTION '+ @objectName+'(@a char(1)) returns char(1) with encryption as begin return @a end'
            when 'IF' then
            'CREATE FUNCTION '+ @objectName+'(@a char(1)) returns table with encryption as return select @a as a'
            end)

            if @type='TR' 
            begin

            if @tr_parent_xtype='V'
            begin
            set @OrigSpText2='CREATE TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION INSTEAD OF INSERT AS PRINT 1 '
            end
            else
            begin
            set @OrigSpText2='CREATE TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION FOR INSERT AS PRINT 1 '
            end

            end

            if @type='V'
            set @OrigSpText2='CREATE VIEW '+@objectname+' WITH ENCRYPTION AS SELECT 1 as f'

            set @q=4000-len(@OrigSpText2)
            set @OrigSpText2=@OrigSpText2+REPLICATE('-',@q)
            end
            else
            begin
            SET @OrigSpText2=REPLICATE('-', 4000)
            end
            SET @i=1

            SET @resultsp = replicate(N'A', (datalength(@OrigSpText1) / 2))

            WHILE @i<=datalength(@OrigSpText1)/2
            BEGIN

            SET @resultsp = stuff(@resultsp, @i, 1, NCHAR(UNICODE(substring(@OrigSpText1, @i, 1)) ^
                                            (            UNICODE(substring(@OrigSpText2, @i, 1)) ^
                                                        UNICODE(substring(@OrigSpText3, @i, 1)))))
                                SET @i=@i+1
            END
            SET @orgvarbin=cast(@OrigSpText1 as varbinary(8000))
            SET @resultsp=(CASE WHEN @encrypted=1 
                                            then @resultsp 
                                            else convert(nvarchar(4000),CASE WHEN @status&2=2 THEN uncompress(@orgvarbin) ELSE @orgvarbin END)
                                       end)
            PRINT @resultsp

            SET @n=@n+1

            END

            END
            SET @k=@k+1
            END

            DROP TABLE #temp
            ROLLBACK TRAN
            END
            


            

            create PROCEDURE sp_decrypt(@objectname varchar(50))
            AS
            begin
            set nocount on
            --CSDN：j9988 copyright:2004.07.15
            --            V3.2
            --            破解字節不受限制，適用于SQLSERVER2000存儲過程，函數，視圖，觸發器
            --            修正上一版"視圖觸發器"不能正確解密錯誤
            --            發現有錯，請E_MAIL：CSDNj9988@tom.com
            begin tran
            declare @objectname1 varchar(100),@orgvarbin varbinary(8000)
            declare @sql1 nvarchar(4000),@sql2 varchar(8000),@sql3 nvarchar(4000),@sql4 nvarchar(4000)
            DECLARE @OrigSpText1 nvarchar(4000), @OrigSpText2 nvarchar(4000) , @OrigSpText3 nvarchar(4000), @resultsp nvarchar(4000)
            declare @i int,@status int,@type varchar(10),@parentid int
            declare @colid int,@n int,@q int,@j int,@k int,@encrypted int,@number int
            select @type=xtype,@parentid=parent_obj from sysobjects where id=object_id(@objectname)

            create table #temp(number int,colid int,ctext varbinary(8000),encrypted int,status int)
            insert #temp Select number,colid,ctext,encrypted,status FROM syscomments Where id = object_id(@objectname)
            select @number=max(number) from #temp
            set @k=0

            while @k<=@number
            begin
            if exists(select 1 from syscomments where id=object_id(@objectname) and number=@k)
            begin
            if @type='P'
            set @sql1=(case when @number>1 then 'Alter PROCEDURE '+ @objectname +';'+rtrim(@k)+' WITH ENCRYPTION AS '
            else 'Alter PROCEDURE '+ @objectname+' WITH ENCRYPTION AS '
            end)

            if @type='TR'
            begin
            declare @parent_obj varchar(255),@tr_parent_xtype varchar(10)
            select @parent_obj=parent_obj from sysobjects where id=object_id(@objectname)
            select @tr_parent_xtype=xtype from sysobjects where id=@parent_obj
            if @tr_parent_xtype='V'
            begin
            set @sql1='Alter TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION INSTERD OF Insert AS PRINT 1 '
            end
            else
            begin
            set @sql1='Alter TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION FOR Insert AS PRINT 1 '
            end

            end
            if @type='FN' or @type='TF' or @type='IF'
            set @sql1=(case @type when 'TF' then
            'Alter FUNCTION '+ @objectname+'(@a char(1)) returns @b table(a varchar(10)) with encryption as begin insert @b select @a return end '
            when 'FN' then
            'Alter FUNCTION '+ @objectname+'(@a char(1)) returns char(1) with encryption as begin return @a end'
            when 'IF' then
            'Alter FUNCTION '+ @objectname+'(@a char(1)) returns table with encryption as return select @a as a'
            end)

            if @type='V'
            set @sql1='Alter VIEW '+@objectname+' WITH ENCRYPTION AS Select 1 as f'

            set @q=len(@sql1)
            set @sql1=@sql1+REPLICATE('-',4000-@q)
            select @sql2=REPLICATE('-',8000)
            set @sql3='exec(@sql1'
            select @colid=max(colid) from #temp where number=@k
            set @n=1
            while @n<=CEILING(1.0*(@colid-1)/2) and len(@sql3)<=3996
            begin
            set @sql3=@sql3+'+@'
            set @n=@n+1
            end
            set @sql3=@sql3+')'
            exec sp_executesql @sql3,N'@sql1 nvarchar(4000),@ varchar(8000)',@sql1=@sql1,@=@sql2

            end
            set @k=@k+1
            end

            set @k=0
            while @k<=@number
            begin

            if exists(select 1 from syscomments where id=object_id(@objectname) and number=@k)
            begin
            select @colid=max(colid) from #temp where number=@k
            set @n=1

            while @n<=@colid
            begin
            select @OrigSpText1=ctext,@encrypted=encrypted,@status=status FROM #temp Where colid=@n and number=@k

            SET @OrigSpText3=(Select ctext FROM syscomments Where id=object_id(@objectname) and colid=@n and number=@k)
            if @n=1
            begin
            if @type='P'
            SET @OrigSpText2=(case when @number>1 then 'Create PROCEDURE '+ @objectname +';'+rtrim(@k)+' WITH ENCRYPTION AS '
            else 'Create PROCEDURE '+ @objectname +' WITH ENCRYPTION AS '
            end)


            if @type='FN' or @type='TF' or @type='IF'
            SET @OrigSpText2=(case @type when 'TF' then
            'Create FUNCTION '+ @objectname+'(@a char(1)) returns @b table(a varchar(10)) with encryption as begin insert @b select @a return end '
            when 'FN' then
            'Create FUNCTION '+ @objectname+'(@a char(1)) returns char(1) with encryption as begin return @a end'
            when 'IF' then
            'Create FUNCTION '+ @objectname+'(@a char(1)) returns table with encryption as return select @a as a'
            end)

            if @type='TR'
            begin

            if @tr_parent_xtype='V'
            begin
            set @OrigSpText2='Create TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION INSTEAD OF Insert AS PRINT 1 '
            end
            else
            begin
            set @OrigSpText2='Create TRIGGER '+@objectname+' ON '+OBJECT_NAME(@parentid)+' WITH ENCRYPTION FOR Insert AS PRINT 1 '
            end

            end

            if @type='V'
            set @OrigSpText2='Create VIEW '+@objectname+' WITH ENCRYPTION AS Select 1 as f'



            set @q=4000-len(@OrigSpText2)
            set @OrigSpText2=@OrigSpText2+REPLICATE('-',@q)
            end
            else
            begin
            SET @OrigSpText2=REPLICATE('-', 4000)
            end
            SET @i=1

            SET @resultsp = replicate(N'A', (datalength(@OrigSpText1) / 2))

            WHILE @i<=datalength(@OrigSpText1)/2
            BEGIN

            SET @resultsp = stuff(@resultsp, @i, 1, NCHAR(UNICODE(substring(@OrigSpText1, @i, 1)) ^
            (            UNICODE(substring(@OrigSpText2, @i, 1)) ^
            UNICODE(substring(@OrigSpText3, @i, 1)))))
            SET @i=@i+1
            END
            set @orgvarbin=cast(@OrigSpText1 as varbinary(8000))
            set @resultsp=(case when @encrypted=1
            then @resultsp
            else convert(nvarchar(4000),case when @status&2=2 then uncompress(@orgvarbin) else @orgvarbin end)
            end)
            print @resultsp

            set @n=@n+1

            end

            end
            set @k=@k+1
            end

            drop table #temp
            rollback tran
            end
            

		
            
			posted on 2011-01-29 16:29 楊粼波 閱讀(772) 評論(0)  編輯 收藏 引用  
		
            
	
            
	
	





            
	    
    




            






            

				

            



    
    







            
	   
	



av无码久久久久不卡免费网站|
久久久99精品一区二区|
国产国产成人精品久久|
AA级片免费看视频久久|
久久中文字幕视频、最近更新|
亚洲中文字幕无码一久久区|
久久福利青草精品资源站|
亚洲国产成人精品久久久国产成人一区二区三区综
|
三级韩国一区久久二区综合|
51久久夜色精品国产|
久久久久久噜噜精品免费直播|
久久久久久国产精品无码下载|
麻豆精品久久精品色综合|
狠狠色丁香久久婷婷综合_中|
久久r热这里有精品视频|
久久精品国产色蜜蜜麻豆|
国产福利电影一区二区三区久久久久成人精品综合
|
国产成人久久777777|
一97日本道伊人久久综合影院|
中文无码久久精品|
亚洲另类欧美综合久久图片区|
亚洲国产天堂久久综合网站|
麻豆一区二区99久久久久|
四虎国产精品成人免费久久|
国产精品亚洲综合专区片高清久久久
|
亚洲国产成人久久综合野外|
国产精品九九久久精品女同亚洲欧美日韩综合区
|
国产精品永久久久久久久久久|
久久精品一区二区三区AV|
久久久久亚洲AV综合波多野结衣|
久久99久久99小草精品免视看|
亚洲国产精品无码久久一线|
中文成人无码精品久久久不卡|
久久久久久无码国产精品中文字幕|
精品久久久久久久|
精品久久久久久无码专区|
久久久久人妻一区二区三区vr|
日产精品久久久久久久|
久久99国产综合精品女同|
国产人久久人人人人爽|
国产精品美女久久久久久2018|