[已解决]批处理怎样把名字与手机号的位置统一？

gcbgczhang · 发表于 2019-7-5 11:07:44

本帖最后由 gcbgczhang 于 2021-7-31 14:20 编辑

拜见各位老师和前辈，我想要这样一个东西。
list.txt内容
王文龙 18219243233
苏洪秋 15330352670
张士祥 13695247007
石磊15015635907
田喜13484727896
赵亚明15019609194
哈春利13410982393
王翀 18320907528
13536622391 刘宁
13530693246 韩东
18125789469 陈彩凤
13530769943 常立春
...
要得到手机号后空一格跟上名字
18219243233 王文龙
15330352670 苏洪秋
13695247007 张士祥
15015635907 石磊
13484727896 田喜
15019609194 赵亚明
13410982393 哈春利
18320907528 王翀
13536622391 刘宁
13530693246 韩东
18125789469 陈彩凤
13530769943 常立春

不会弄啊，字符串截取吗，判断第一个字符是不是1，是的话截11位，然后载后面的，但是中间的空格长短不一，不知道先把中间的空格去掉再截取是不是可行

zaqmlp · 发表于 2019-7-5 12:12:08

@echo off
set info=互助互利,支付宝扫码头像,感谢赞助
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~dp0"
set "input=list.txt"
set "output=result.txt"
powershell -NoProfile -ExecutionPolicy bypass ^
$text=[IO.File]::ReadAllLines('%input%',[Text.Encoding]::Default);^
$fs=New-Object System.IO.FileStream('%output%', [System.IO.FileMode]::Create);^
$sw=New-Object System.IO.StreamWriter($fs, [Text.Encoding]::Default);^
for($i=0;$i -lt $text.count;$i++){^
$m=[regex]::match($text[$i].trim(),'^^([^^\s\d]+)\s*?(\d+)');^
if($m.success){^
$sw.WriteLine($m.groups[2].value+"`t"+$m.groups[1].value);^
}else{^
$m=[regex]::match($text[$i].trim(),'^^(\d+)\s*?([^^\s\d]+)');^
if($m.success){$sw.WriteLine($m.groups[1].value+"`t"+$m.groups[2].value)};^
};^
};^
$sw.Close();$fs.Close();
echo;%info%
pause

复制代码

Batcher · 发表于 2019-7-5 12:53:40

@echo off
setlocal enabledelayedexpansion
(for /f "delims=" %%a in ('type "list.txt"') do (
set "str=%%a"
set "str=!str: =!"
set "str=!str: =!"
if "!str:~0,1!" equ "1" (
echo !str:~0,11! !str:~11!
) else (
echo !str:~-11! !str:~0,-11!
)
))>"list_new.txt"

复制代码

gcbgczhang · 发表于 2019-7-5 18:42:27

回复 3# Batcher

谢谢老师，用过了，得到了我想要的

alexsq08a · 发表于 2019-7-5 20:57:29

学习学习学习学习

		自动登录	找回密码
密码			注册

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

[文本处理] [已解决]批处理怎样把名字与手机号的位置统一？