[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 【已解决】批处理如何把原码转换成字符串?

本帖最后由 lgxxxx 于 2013-12-22 10:49 编辑

已知变量:
  1. set _="U}'mf6jSb@HI3XvhjcxfhgjklgcfgcgcgcgcW]5we?9:0Rs{il|KZn8T,<#qv[MNx>V*/DE(O\.`7k-Lt^u$oF)=G&aJh gyzp1!A+4BCrc2PQdY"
复制代码
原码:
  1. if 0 equ 9 pause&cls&exit
复制代码
通过上边的变量把原码转换成下面的字符串:
  1. %_:~49,1%%_:~5,1%%_:~94,1%%_:~45,1%%_:~94,1%%_:~41,1%%_:~60,1%%_:~83,1%%_:~94,1%%_:~43,1%%_:~94,1%%_:~98,1%%_:~91,1%%_:~83,1%%_:~47,1%%_:~41,1%%_:~90,1%%_:~18,1%%_:~25,1%%_:~47,1%%_:~90,1%%_:~41,1%%_:~19,1%%_:~49,1%%_:~81,1%
复制代码
请问如何用批处理来实验这个功能啊...
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

  1. set x=nothing '&cls&cscript -nologo -e:vbscript "%~0" & pause & exit /b
  2. str = "U}'mf6jSb@HI3XvhjcxfhgjklgcfgcgcgcgcW]5we?9:0Rs{il|KZn8T,<#qv[MNx>V*/DE(O\.`7k-Lt^u$oF)=G&aJh gyzp1!A+4BCrc2PQdY"
  3. var = "if 0 equ 9 pause&cls&exit"
  4. for i = 1 to Len(var)
  5.     n = InStr(str,mid(var,i,1))
  6.     if n Then
  7.         s = s & "%_:~" & n & ",1%"
  8.     else s = s & mid(var,i,1)
  9.     end if
  10. next
  11. WScript.Echo s
复制代码
1

评分人数

TOP

apang 发表于 2013-12-14 18:31



    大牛...能用批处理把获得的结果写在TXT文档吗?(上面的是VBS啊)

TOP

上面代码是加入了vbs的批处理,扩展名还是bat

TOP

上面代码是加入了vbs的批处理,扩展名还是bat
zhanglei1371 发表于 2013-12-14 19:48



谢谢。。学习了。。

TOP

上面代码是加入了vbs的批处理,扩展名还是bat
zhanglei1371 发表于 2013-12-14 19:48



    如果扩展名还是bat,运行就得出错

TOP

参考我的 恶作剧工厂  中加密部分

TOP

参考我的 恶作剧工厂  中加密部分
bluewing009 发表于 2013-12-14 23:26



    在哪里的.能给个地址吗?

TOP

回复 6# tz_being


    报错信息是什么?

TOP

我错了,我是前面加了@echo off才报错的。不过跟楼主一样,想知道怎么把结果输出到文本文件中?

TOP

返回列表