批处理之家 » BAT求助&讨论 » [已解决]批处理如何截取字段？

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

返回列表发帖

Rank: 1

帖子: 36
积分: 67
技术: 0
捐助: 0
注册时间: 2012-12-24

1楼 跳转到 » 倒序看帖

字体大小: tT

发表于 2015-2-11 11:36 | 只看该作者

[文本处理] [已解决]批处理如何截取字段？

本帖最后由 oqis 于 2015-4-15 15:55 编辑

a.txt

arv19750914003P22946
arv1980060400P2394672
arv1999092300223P22946997
.
.
.
复制代码

有十几行，我想截取前面一段输出成这样：

arv19750914003P22
arv1980060400P23
arv1999092300223P22
.
.
复制代码

哪位出出手~~~

1 评分人数

Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

Rank: 8 Rank: 8

帖子: 2874
积分: 7021
技术: 336
捐助: 0
注册时间: 2011-6-2

2楼

发表于 2015-2-11 12:34 | 只看该作者

@echo off
setlocal enabledelayedexpansion
(for /f "tokens=1-2 delims=P" %%i in (1.txt) do (
    set suffix=%%j
    echo %%iP!suffix:~0,2!
))>2.txt
复制代码

1 评分人数

Batcher: 乐于助人技术 + 1

sed.exe gawk.exe grep.exe 下载地址

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

3楼

发表于 2015-2-11 12:34 | 只看该作者

回复 1# oqis

是截取从第一个字符到p后面两个的字符吗？

Rank: 1

帖子: 48
积分: 76
技术: 5
捐助: 0
注册时间: 2015-2-1

4楼

发表于 2015-2-11 14:24 | 只看该作者

gawk -FP "gsub(substr($2,3),\"\")"

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

5楼

发表于 2015-2-11 14:34 | 只看该作者

本帖最后由 pcl_test 于 2015-4-15 17:32 编辑

回复 1# oqis

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('type "a.txt"') do (
call :loop %%a
)
pause
:loop
set str=%1
for /l %%i in (0,1,100) do (
if "!str:~%%i,1!"=="P" set "n=%%i"
)
set /a n+=3
echo !str:~0,%n%!
goto :eof
复制代码

Rank: 1

帖子: 36
积分: 67
技术: 0
捐助: 0
注册时间: 2012-12-24

6楼

发表于 2015-2-11 18:42 | 只看该作者

回复 2# DAIC
很满意多谢~~

Rank: 1

帖子: 36
积分: 67
技术: 0
捐助: 0
注册时间: 2012-12-24

7楼

发表于 2015-2-11 18:42 | 只看该作者

回复 5# pcl_test
行谢谢了

Rank: 2

帖子: 92
积分: 166
技术: 4
捐助: 0
注册时间: 2014-12-13

8楼

发表于 2015-2-12 10:44 | 只看该作者

@echo off&color f0&setlocal enabledelayedexpansion
(for /f "delims=" %%h in (a.txt) do (
set str=%%h
for /l %%i in (0,1,100) do (
if "!str:~%%i,1!" == "P" (
set /a n=%%i+3
call echo %%str:~0,!n!%%
)
)
)
)>test.txt
pause
复制代码

回复 8# c755731262
刚才发错了，很抱歉