凤凰平台注册开户_凤凰彩票app下载安装_凤凰彩票投注网

热门关键词: 凤凰平台注册开户,凤凰彩票app下载安装,凤凰彩票投注网

列出数据库中有数据的表的称谓和数据,破解函

作者: MySQL数据库  发布:2019-11-05

DECLARE @tableNames varchar(500)
SET @tableNames='xxx,DB2, '   -- 关键此处填写供给刷新视图的数据库名称

列表出有数据的表:

 

DECLARE @i_start int
SET @i_start=1;

select name from sysobjects o where type='u' and exists ( select * from sysindexes where id=o.id and indid<2 and rows>0 )

 --破解函数,进度,触发器,视图.只限于SQLSE中华VVE本田UR-V二零零二   
    
  --作者:J9988--  
  --调用示例   
    
  --解密内定期存款款和储蓄进程   
  exec   sp_decrypt   'AppSP_test'   
    
  --对负有的仓储进程解密   
  declare   tb   cursor   for   
  select   name   from   sysobjects   where   xtype='P'   and   status>0   
    
  declare   @name   sysname   
  open   tb   
  fetch   next   from   tb   into   @name   
  while   @@fetch_status=0   
  begin   
  print   '-------存款和储蓄进度   ['+@name+']   -----------'   

DECLARE @i_end int
SET @i_end = CHARINDEX(',', @tableNames, @i_start);

 

  exec   sp_decrypt   @name   
  fetch   next   from   tb   into   @name   
  end  
 
  close   tb  --关闭游标  
  deallocate   tb   --删除游标 
 
    
  if   exists   (select * from  dbo.sysobjects where id=object_id(N'[dbo].[sp_decrypt]') and  OBJECTPROPERTY(id,N'IsProcedure') =1)   
  drop procedure [dbo].[sp_decrypt]   
  GO   
    
  CREATE  PROCEDURE sp_decrypt(@objectName   varchar(50))   
  AS   
  begin   
  set   nocount   on   
  --CSDN:j9988   copyright:2004.04.15     
  --V3.1     
  --破解字节不受约束,适用于SQLSE翼虎VERAV4贰零零肆存款和储蓄进度,函数,视图,触发器   
  --修改上黄金时代版视图触发器不能够正确解密错误   
  --开掘成错,请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 

DECLARE @tableName varchar(30)

OR

 

declare @s nvarchar(1000) -- 注意此处改为nvarchar(1000)

select o.name from sysobjects o,sysindexes i where o.type='u' and i.id=o.id and i.indid<2 and i.rows>0

 

WHILE @i_end>0
BEGIN
  SET @tableName= LTrim(RTrim(SUBSTRING(@tableNames, @i_start, @i_end-@i_start)))
  --select @tableName

  

 

  if exists(select * from master..sysdatabases where name=@tableName)
  begin
    print '更新 数据库['+ @tableName+']装有视图'

 

 

    if exists (select * from tempdb.dbo.sysobjects where id = object_id(N'tempdb..#tempTable') and type='U')
    begin
      drop table #tempTable
    end
    create table #tempTable (_sql_ nvarchar(1000))

列出多少:

凤凰彩票投注网 1凤凰彩票投注网 2sql2005破解

    SET @s = 'USE '+@tableName+' select ''USE '+@tableName+ ' EXECUTE sp_refreshview '' + name from sysobjects where [xtype]=''V'''
    insert into #tempTable(_sql_)
    exec sp_executesql @s

declare @tablename varchar(100),@ii varchar(10),@temp nvarchar(1000),@temp2 nvarchar(1000) declare @i int,@count int,@datecount int select @count=count(*) from sysobjects where xtype='u' set @i=1 while(@i<=@count) begin set @ii=@i set @temp='select top 1 @name=name from(select top '+@ii+' name from sysobjects where xtype=''u'' order by name)as a order by name desc' exec sp_executesql @temp,N'@name nvarchar(50) output',@tablename output set @temp2='select @date=count(*) from '+@tablename+'' exec sp_executesql @temp2,N'@date int output',@datecount output if(@datecount>0) begin exec('select * from '+@tablename+'') print @tablename end set @i=@i+1 end

1.用到 DAC 与服务器连接 
在 SQL Server Management Studio 中,不展开其余 DAC,单击工具栏上的“数据库引擎查询”。 
在“连接到数据库引擎”对话框的“服务器名称”框中,键入 ADMIN:,并在未来继续键入服务器实例的称号。譬如,若要连接到名叫 ACCTPAYABLE 的服务器实例,请键入 ADMIN:ACCTPAYABLE。
完了“身份验证”部分(提供 sysadmin 组成员的凭据卡塔 尔(阿拉伯语:قطر‎,然后单击“连接”。将确立连接。

    ---游标循环遍历--
    declare @temp nvarchar(1000)

 

2.--DAC设置能够接连,

    --评释游标
    declare order_cursor cursor

0 - 指明仅允许本地连接使用 DAC 
1 - 指明允许远程连接使用 DAC
sp_configure 'remote admin connections', 1;
GO
RECONFIGURE;
GO 

    for(select * from #tempTable)
    --展开游标--
    open order_cursor
    --伊始循环游标变量--
    fetch next from order_cursor into @temp
    while @@FETCH_STATUS = 0 --重回被 FETCH语句实践的末段游标的情况--
    begin
      --print @temp
      exec (@temp) --OK
      --exec sp_executesql @temp --OK

在STUDIO DAC模试下实行或在sqlcmd -A -o c:1.txt格局下进行,输出文件 

      fetch next from order_cursor into @temp --转到下二个游标,没有会死循环
    end

DECLARE @return_value int

    close order_cursor --关闭游标
    deallocate order_cursor --释放游标

EXEC @return_value = [dbo].[sp__windbi$decryptb]
  @procedure = testencry,
  @revfl = 0

    --用完现在要把有的时候表清空
    drop table #tempTable--要求注意的是,这种措施不能嵌套。

SELECT 'Return Value' = @return_value 

  end

GO

  SET @i_start = @i_end + 1;
  SET @i_end = CHARINDEX(',', @tableNames, @i_start);

解密存款和储蓄进程如下:

END

 view plaincopy to clipboardprint?
     
Create PROCEDURE [dbo].[sp_undecrypt]     
(@procedure sysname = NULL, @revfl int = 1)     
AS     
/**//*    
王成辉翻译整理,转载帖子请评释来源微软BI波特兰开拓者www.windbi.com    
调用格局为:    
exec dbo.sp__windbi$decrypt @procedure,0    
设若第叁个参数使用1的话,会付给该存款和储蓄进度的片段唤起。    
--版本4.0  更改存款和储蓄进程过长解密出来是空荡荡的标题    
*/     
SET NOCOUNT ON     
IF @revfl = 1     
BEGIN     
P奥迪Q5INT '警报:该存款和储蓄进度会去除同样珍视建原始的囤积进度。'     
P宝马7系INT ' 在运作该存款和储蓄进程此前确认保障您的数据库有三个备份。'     
P帕杰罗INT ' 该存款和储蓄进程通常应该运转在付加物意况的多少个备份的非成品境遇下。'     
PPAJEROINT ' 为了运维那么些蕴藏进程,将参数@refl的值改善为0。'     
RETURN 0     
END     
DECLARE @intProcSpace bigint, @t bigint, @maxColID smallint,@procNameLength int     
select @maxColID = max(subobjid) FROM     
sys.sysobjvalues WHERE objid = object_id(@procedure)     
--select @maxColID as 'Rows in sys.sysobjvalues'     
select @procNameLength = datalength(@procedure) + 29     
DECLARE @real_01 nvarchar(max)     
DECLARE @fake_01 nvarchar(max)     
DECLARE @fake_encrypt_01 nvarchar(max)     
DECLARE @real_decrypt_01 nvarchar(max),@real_decrypt_01a nvarchar(max)     
declare @objtype varchar(2),@ParentName nvarchar(max)     
select @real_decrypt_01a = ''     
--提取对象的种类如是存款和储蓄进度也许函数,假如是触发器,还要拿到其父对象的名号     
select @objtype=type,@parentname=object_name(parent_object_id)     
from sys.objects where [object_id]=object_id(@procedure)     
-- 从sys.sysobjvalues里提出加密的imageval记录     
SET @real_01=(SELECT top 1 imageval FROM sys.sysobjvalues WHERE objid =     
object_id(@procedure) and valclass = 1 order by subobjid)     
     
--创设二个权且表     
create table #output ( [ident] [int] IDENTITY (1, 1) NOT NULL ,     
[real_decrypt] NVARCHAR(MAX) )     
--开首三个事务,稍后回滚     
BEGIN TRAN     
--修改原始的囤积进度,用短横线替换     
if @objtype='P'     
  SET @fake_01='ALTER PROCEDURE '+ @procedure +' WITH ENCRYPTION AS select 1     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
else if @objtype='FN'     
  SET @fake_01='ALTER FUNCTION '+ @procedure +'() RETURNS INT WITH ENCRYPTION AS BEGIN RETURN 1     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/ END'     
else if @objtype='V'     
  SET @fake_01='ALTER view '+ @procedure +' WITH ENCRYPTION AS select 1 as col     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
else if @objtype='TR'     
  SET @fake_01='ALTER trigger '+ @procedure +' ON '+@parentname+'WITH ENCRYPTION AFTER INSERT AS RAISERROR (''N'',16,10)     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
EXECUTE (@fake_01)     
--从sys.sysobjvalues里建议加密的假的     
SET @fake_encrypt_01=(SELECT top 1 imageval FROM sys.sysobjvalues WHERE objid =     
object_id(@procedure) and valclass = 1 order by subobjid )     
if @objtype='P'     
  SET @fake_01='Create PROCEDURE '+ @procedure +' WITH ENCRYPTION AS select 1     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
else if @objtype='FN'     
  SET @fake_01='CREATE FUNCTION '+ @procedure +'() RETURNS INT WITH ENCRYPTION AS BEGIN RETURN 1     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/ END'     
else if @objtype='V'     
  SET @fake_01='Create view '+ @procedure +' WITH ENCRYPTION AS select 1 as col     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
else if @objtype='TR'     
  SET @fake_01='Create trigger '+ @procedure +' ON '+@parentname+'WITH ENCRYPTION AFTER INSERT AS RAISERROR (''N'',16,10)     
  /**//*'+REPLICATE(cast('*'as nvarchar(max)), datalength(@real_01) /2 - @procNameLength)+'*/'     
--发轫计数     
SET @intProcSpace=1     
--使用字符填充一时变量     
SET @real_decrypt_01 = replicate(cast('A'as nvarchar(max)), (datalength(@real_01) /2 ))     
--循环设置每多少个变量,创建真正的变量     
--每一遍叁个字节     
SET @intProcSpace=1     
--如有供给,遍历每种@real_xx变量并解密     
WHILE @intProcSpace<=(datalength(@real_01)/2)     
BEGIN     
--真的和假的和加密的假的进展异或处理     
SET @real_decrypt_01 = stuff(@real_decrypt_01, @intProcSpace, 1,     
NCHAR(UNICODE(substring(@real_01, @intProcSpace, 1)) ^     
(UNICODE(substring(@fake_01, @intProcSpace, 1)) ^     
UNICODE(substring(@fake_encrypt_01, @intProcSpace, 1)))))     
SET @intProcSpace=@intProcSpace+1     
END     
     
     
--通过sp_helptext逻辑向表#output里插入变量     
insert #output (real_decrypt) select @real_decrypt_01     
--select real_decrypt AS '#output chek' from #output --测试     
-- -------------------------------------     
--开始从sp_helptext提取     
-- -------------------------------------     
declare @dbname sysname     
,@BlankSpaceAdded int     
,@BasePos int     
,@CurrentPos int     
,@TextLength int     
,@LineId int     
,@AddOnLen int     
,@LFC昂科雷 int --回车换行的长度     
,@DefinedLength int     
,@SyscomText nvarchar(max)     
,@Line nvarchar(255)     
Select @DefinedLength = 255     
SELECT @BlankSpaceAdded = 0 --追踪行甘休的空格。注意Len函数忽略了剩下的空格     
CREATE TABLE #CommentText     
(LineId int     
,Text nvarchar(255) collate database_default)     
--使用#output代替sys.sysobjvalues     
DECLARE ms_crs_syscom CURSOR LOCAL     
FOR SELECT real_decrypt from #output     
ORDER BY ident     
FOR READ ONLY     
--得到文本     
SELECT @LFCR = 2     
SELECT @LineId = 1     
OPEN ms_crs_syscom     
FETCH NEXT FROM ms_crs_syscom into @SyscomText     
WHILE @@fetch_status >= 0     
BEGIN     
SELECT @BasePos = 1     
SELECT @CurrentPos = 1     
SELECT @TextLength = LEN(@SyscomText)     
WHILE @CurrentPos != 0     
BEGIN     
--通过回车查找行的利落     
SELECT @CurrentPos = CHARINDEX(char(13)+char(10), @SyscomText,     
@BasePos)     
--假若找到回车     
IF @CurrentPos != 0     
BEGIN     
--借使@Lines的长短的新值比设置的大就插入@Lines这段日子的开始和结果并继续     
While (isnull(LEN(@Line),0) + @BlankSpaceAdded +     
@CurrentPos-@BasePos + @LFCR) > @DefinedLength     
BEGIN     
SELECT @AddOnLen = @DefinedLength-(isnull(LEN(@Line),0) +     
@BlankSpaceAdded)     
INSERT #CommentText VALUES     
( @LineId,     
isnull(@Line, N'') + isnull(SUBSTRING(@SyscomText,     
@BasePos, @AddOnLen), N''))     
SELECT @Line = NULL, @LineId = @LineId + 1,     
@BasePos = @BasePos + @AddOnLen, @BlankSpaceAdded = 0     
END     
SELECT @Line = isnull(@Line, N'') +     
isnull(SUBSTRING(@SyscomText, @BasePos, @CurrentPos-@BasePos + @LFCR), N'')     
SELECT @BasePos = @CurrentPos+2     
INSERT #CommentText VALUES( @LineId, @Line )     
SELECT @LineId = @LineId + 1     
SELECT @Line = NULL     
END     
ELSE     
--假诺回车没找到     
BEGIN     
IF @BasePos <= @TextLength     
BEGIN     
--假设@Lines长度的新值大于定义的尺寸     
While (isnull(LEN(@Line),0) + @BlankSpaceAdded +     
@TextLength-@BasePos+1 ) > @DefinedLength     
BEGIN     
SELECT @AddOnLen = @DefinedLength -     
(isnull(LEN(@Line),0) + @BlankSpaceAdded)     
INSERT #CommentText VALUES     
( @LineId,     
isnull(@Line, N'') + isnull(SUBSTRING(@SyscomText,     
@BasePos, @AddOnLen), N''))     
SELECT @Line = NULL, @LineId = @LineId + 1,     
@BasePos = @BasePos + @AddOnLen, @BlankSpaceAdded =     
0     
END     
SELECT @Line = isnull(@Line, N'') +     
isnull(SUBSTRING(@SyscomText, @BasePos, @TextLength-@BasePos+1 ), N'')     
if LEN(@Line) < @DefinedLength and charindex(' ',     
@SyscomText, @TextLength+1 ) > 0     
BEGIN     
SELECT @Line = @Line + ' ', @BlankSpaceAdded = 1     
END     
END     
END     
END     
FETCH NEXT FROM ms_crs_syscom into @SyscomText     
END     
IF @Line is NOT NULL     
INSERT #CommentText VALUES( @LineId, @Line )     
select Text from #CommentText order by LineId     
CLOSE ms_crs_syscom     
DEALLOCATE ms_crs_syscom     
DROP TABLE #CommentText     
-- -------------------------------------     
--结束从sp_helptext提取     
-- -------------------------------------     
--删除用短横线创设的蕴藏过程同等看待建原始的积攒进度     
ROLLBACK TRAN     
DROP TABLE #output  

正文来源CSDN博客,转发请标注出处:

 

 

本文由凤凰平台注册开户发布于MySQL数据库,转载请注明出处:列出数据库中有数据的表的称谓和数据,破解函

关键词:

上一篇:没有了
下一篇:没有了