中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-07 20:50

共 48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行

DOS批处理 & 脚本技术（批处理室） » 如何显示每行中指定字符!

可打印版本　693 / 2

第1楼　wahagogogo	发表于 2008-03-21 15:18
新手上路　发帖 1　积分 4
如何显示每行中指定字符! abc.txt内容如下: aaa123 bbb234 ccc345 ddd456 编辑批处理得到如下内容: 123 234 345 456

第2楼　abcd	发表于 2008-03-21 15:41
银牌会员　发帖 739　积分 1,436
Dim regEx, fso, f, str, fn fn="abc.txt" Set regEx = New RegExp regEx.Pattern = "\D" regEx.IgnoreCase = True regEx.Global = True set fso=createobject("scripting.filesystemobject") set f=fso.opentextfile(fn,1) do while f.atendofstream <> true str=str&regEx.replace(f.readline,"")&vbCrLf loop f.close set f=fso.opentextfile(fn,2) f.write str f.close msgbox "修改完成" set f=nothing set fso=nothing set regex=nothing

第3楼　HAT	发表于 2008-03-21 15:45
版主　发帖 5,017　积分 9,023
@echo off setlocal enabledelayedexpansion for /f %%a in (C:\abc.txt) do ( set row=%%a echo !row:~-3! )

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023