批处理之家 - Powered by Discuz! Board

标题: [文本处理] 【已解决】批处理如何把原码转换成字符串？ [打印本页]

作者: lgxxxx 时间: 2013-12-14 15:41 标题: 【已解决】批处理如何把原码转换成字符串？

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

已知变量:

set _="U}'mf6jSb@HI3XvhjcxfhgjklgcfgcgcgcgcW]5we?9:0Rs{il|KZn8T,<#qv[MNx>V*/DE(O\.`7k-Lt^u$oF)=G&aJh gyzp1!A+4BCrc2PQdY"
复制代码

原码:

if 0 equ 9 pause&cls&exit 
复制代码

通过上边的变量把原码转换成下面的字符串:

%_:~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% 
复制代码

请问如何用批处理来实验这个功能啊...

作者: apang 时间: 2013-12-14 18:31

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

作者: lgxxxx 时间: 2013-12-14 19:15

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

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

作者: zhanglei1371 时间: 2013-12-14 19:48

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

作者: lgxxxx 时间: 2013-12-14 20:00

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

谢谢。。学习了。。

作者: tz_being 时间: 2013-12-14 22:53

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

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

作者: bluewing009 时间: 2013-12-14 23:26

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

作者: lgxxxx 时间: 2013-12-15 10:28

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

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

作者: DAIC 时间: 2013-12-15 14:17

回复 6# tz_being

报错信息是什么？

作者: tz_being 时间: 2013-12-15 20:40

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

欢迎光临批处理之家 (http://www.bathome.net/)