批处理之家 - Powered by Discuz! Board

标题: [文本处理] 批处理处理如何只把文本中的数字保留 [打印本页]

作者: 光能 时间: 2012-9-15 23:50 标题: 批处理处理如何只把文本中的数字保留

文本中有多种符号例如a.txt内容如下
-----------------------------------------------
2012年，123类，中文542387,[dian]。
-----------------------------------------------

如何用批处理处理文本a.txt 只保留数字，其余的字符去去掉

处理后a.txt内容如下
----------------------
2012123542387
-----------------------

请问能不能实现以上想法

谢谢

作者: apang 时间: 2012-9-16 10:13

练习。。。

@echo off
more +4 "%~0">$.vbs
cscript /Nologo $.vbs
del $.vbs&goto :eof
Set FSO = CreateObject("Scripting.FileSysTemObject")
Set File = FSO.OpenTextFile("a.txt",1)
Do Until File.AtEndOfStream
   strLine = File.ReadLine
   Set Re = new RegExp
   Re.Pattern = "\D"
   Re.Global = True
   strOut = strOut & Re.Replace(strLine,"") & vbCrLf
Loop
FSO.CreateTextFile("b.txt",true).Write strOut
复制代码

作者: CrLf 时间: 2012-9-16 14:12

学一下 powerbat 的办法~

@set @n=0//&cscript /nologo /e:jscript %0<"要操作的文件">"操作后的文件"&pause&Exit
var str = WScript.StdIn.ReadAll();WScript.Echo(str.replace(/\D/g,""));
复制代码

作者: 光能 时间: 2012-9-18 23:36

回复 3# CrLf

以上二代码都很好地完成只保留数字非常感谢以上二位大师

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