• <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)  編輯 收藏 引用  
		
            
	
            
	
	





            
	    
    




            






            

				

            



    
    







            
	   
	



国产精品丝袜久久久久久不卡|
久久国产免费直播|
99精品久久久久久久婷婷|
亚洲午夜久久久久久久久电影网|
色综合久久88色综合天天|
亚洲国产精品一区二区久久hs|
日日狠狠久久偷偷色综合免费|
国产免费福利体检区久久|
人妻丰满?V无码久久不卡|
奇米综合四色77777久久|
亚洲国产精品高清久久久|
国内精品久久国产大陆|
久久精品国产半推半就|
一本色综合久久|
久久精品国产清自在天天线
|
亚洲精品乱码久久久久66|
青青草国产成人久久91网|
亚洲欧洲精品成人久久曰影片
|
久久国产亚洲精品麻豆|
亚洲欧美一区二区三区久久|
亚洲日本久久久午夜精品|
99久久久久|
久久99精品综合国产首页|
亚洲色婷婷综合久久|
伊人精品久久久久7777|
久久久久国产精品嫩草影院|
欧美久久精品一级c片片|
亚洲AV无码久久精品色欲|
漂亮人妻被中出中文字幕久久|
亚洲国产另类久久久精品
|
国产精品一久久香蕉国产线看观看|
久久青青草原亚洲av无码app|
精品久久人妻av中文字幕|
欧美亚洲国产精品久久高清|
免费精品久久久久久中文字幕|
2021国产精品午夜久久|
亚洲国产成人精品91久久久|
久久综合精品国产一区二区三区
|
久久r热这里有精品视频|
久久久精品国产sm调教网站
|
蜜桃麻豆www久久国产精品|