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

Rank: 5Rank: 5

帖子
766 
积分
1451 
技术
117  
捐助
0  
注册时间
2010-5-12 
16楼 跳转到 »
发表于 2012-2-2 20:01 | 只看该作者 
  1. Dim fso, a, i

  2. Set fso = CreateObject("Scripting.FileSystemObject")

  3. 

  4. With fso.OpenTextFile("abc.txt")

  5.     a = Split(.ReadAll)

  6. End With

  7. 

  8. For i = 0 To UBound(a)

  9.     a(i) = Chr("&H" & a(i))

  10. Next

  11. 

  12. With fso.OpenTextFile("cba.txt", 2, True)

  13.     .Write Join(a, "")

  14. End With
复制代码
1

评分人数

    • height: 测试可行，谢谢技术 + 1
http://demon.tw

TOP

height

Rank: 1

帖子
8 
积分
30 
技术
0  
捐助
0  
注册时间
2012-1-31 
17楼
发表于 2012-2-2 20:05 | 只看该作者
lllsoslll 谢谢你的回复，你的BAT版本，在我的电脑中显示如下：'ascmap.cmd' 不是内部或外部命令，也不是可运行的程序
或批处理文件。
ascmap.cmd文件缺失
请按任意键继续. . .
这是什么原因啊？

TOP

height

Rank: 1

帖子
8 
积分
30 
技术
0  
捐助
0  
注册时间
2012-1-31 
18楼
发表于 2012-2-2 20:28 | 只看该作者
Demon 的测试可行，谢谢Demon。

TOP

hfg1977

Rank: 5Rank: 5

帖子
425 
积分
1096 
技术
57  
捐助
0  
注册时间
2009-9-14 
19楼
发表于 2012-2-2 20:46 | 只看该作者
HEX文件→ASCII文件,命令如下:
  1. Ascii2Hex.bat -H -f HexFile.txt
复制代码
原始HEX文件必须非空白字符开头与结尾,不然生成的文件会多出些字节,可以用这个命令预处理:
  1. sed -i -e "s/\s*$//;s/^\s*//" hexfile.txt
复制代码
虽然我的代码啰嗦了些,还能用也懒得改写了.
“阿姐走了。。。可是。。。我。。。我愿意。”

TOP

jdsdsa

Rank: 1

帖子
35 
积分
34 
技术
0  
捐助
0  
注册时间
2012-1-31 
20楼
发表于 2012-2-2 21:36 | 只看该作者
回复 19# hfg1977


    16转到ascii  我想把它转换成批处理 怎么办

TOP

hfg1977

Rank: 5Rank: 5

帖子
425 
积分
1096 
技术
57  
捐助
0  
注册时间
2009-9-14 
21楼
发表于 2012-2-2 22:01 | 只看该作者
Ascii2Hex.bat 本来就是批处理呀, 你在其他批处理文件里如上调用就可.
“阿姐走了。。。可是。。。我。。。我愿意。”

TOP

jdsdsa

Rank: 1

帖子
35 
积分
34 
技术
0  
捐助
0  
注册时间
2012-1-31 
22楼
发表于 2012-2-2 22:05 | 只看该作者
姐姐 我是说人可以学的批处理

TOP

hfg1977

Rank: 5Rank: 5

帖子
425 
积分
1096 
技术
57  
捐助
0  
注册时间
2009-9-14 
23楼
发表于 2012-2-3 04:56 | 只看该作者
分离出来了:    http://bbs.bathome.net/viewthread.php?tid=15424&extra=
试试看.....
“阿姐走了。。。可是。。。我。。。我愿意。”

TOP

12
返回列表