找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 30227|回复: 6

[文本处理] [已解决]批处理如何实现将txt文本每一行指定字符前后的1位数字前面加0/补零/补0?

[复制链接]
发表于 2017-1-4 07:58:52 | 显示全部楼层 |阅读模式
本帖最后由 pcl_test 于 2017-1-4 09:46 编辑

[已解决]批处理,如何将txt文件每行-前后的1位数,前面自动加上0?

rq.txt文件格式:
8-9
10-6
5-21
11-25


如何转换成:
08-09
10-06
05-21
11-25

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

 楼主| 发表于 2017-1-4 09:12:29 | 显示全部楼层
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f "tokens=1,2 delims=-" %%a in (rq.txt) do (
  3. echo 源串:%%a-%%b
  4. pause

  5. if 1%%a lss 100 (set var1=0%%a) else set var1=%%a
  6. if 1%%b lss 100 (set var2=0%%b) else set var2=%%b

  7. echo !var1!-!var2!>>test.txt

  8. )

  9. del /q rq.txt
  10. ren test.txt rq.txt

  11. 1pause
复制代码
发表于 2017-1-4 13:54:50 | 显示全部楼层
本帖最后由 Nsqs 于 2017-1-8 20:35 编辑
  1. @echo off
  2. (for /f "tokens=1,2 delims=-" %%a in (a.txt)do (
  3. set /a n=%%a*1,n0=n/10,n1=n%%10,n=%%b*1,n2=n/10,n3=n%%10
  4. call set s=%%n0%%%%n1%%-%%n2%%%%n3%%
  5. call echo %%s%%
  6. ))>new.txt
复制代码

评分

参与人数 1技术 +1 收起 理由
Batcher + 1 乐于助人

查看全部评分

 楼主| 发表于 2017-1-4 19:25:51 | 显示全部楼层
回复 3# Nsqs


    你好,你的代码有点问题。

如果a.txt文件内容是:
08-09
5-6
08-09
8-9

生成的new.txt文件为:
-
05-06
05-06
08-09
发表于 2017-1-4 21:09:23 | 显示全部楼层
  1. @if (0)==(0) echo off
  2. cscript //nologo //e:jscript "%~f0" <a.txt
  3. pause & exit @end

  4. var s = WSH.StdIn.ReadAll();
  5. s = s.replace(/^(\d{1,2})-(\d{1,2})\r?$/gm,
  6.         function(s0, s1, s2){
  7.                 return (s1*1 + 100 + '').substr(1) + '-' + (s2*1 + 100 + '').substr(1);
  8.         }
  9. )

  10. WSH.Echo(s)
复制代码
发表于 2017-1-4 21:12:06 | 显示全部楼层
虽然解决了,还是来一发
  1. @echo off&&setlocal enabledelayedexpansion
  2. for /f "delims=- tokens=1,2," %%i in (rq.txt) do (
  3.    set aa=0%%i
  4.    set aa=!aa:~-2,2!
  5.    set bb=0%%j
  6.    set bb=!bb:~-2,2!
  7.    echo !aa!-!bb!>>rq1.txt
  8. )
  9. pause
复制代码
发表于 2017-1-8 20:36:07 | 显示全部楼层
回复 4# ygqiang


    8进制问题,解决了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 14:46 , Processed in 0.023515 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表