Board logo

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

作者: ygqiang    时间: 2017-1-4 07:58     标题: [已解决]批处理如何实现将txt文本每一行指定字符前后的1位数字前面加0/补零/补0?

本帖最后由 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
作者: ygqiang    时间: 2017-1-4 09:12

  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
复制代码

作者: Nsqs    时间: 2017-1-4 13:54

本帖最后由 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
复制代码

作者: ygqiang    时间: 2017-1-4 19:25

回复 3# Nsqs


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

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

生成的new.txt文件为:
-
05-06
05-06
08-09
作者: WHY    时间: 2017-1-4 21:09

  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)
复制代码

作者: hlzj88    时间: 2017-1-4 21:12

虽然解决了,还是来一发
  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
复制代码

作者: Nsqs    时间: 2017-1-8 20:36

回复 4# ygqiang


    8进制问题,解决了




欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2