|
Billunique
中级用户
菜鸟总动员
积分 259
发帖 112
注册 2006-8-28
状态 离线
|
『楼 主』:
［请教］把单行的文字用某种分隔符拆成多行
使用 LLM 解释/回答一下
在论坛里，有大家的帮助，真是一件很幸福的事。我又来请教了。
一个1.txt文件，大致像这个样子：
小明、小红、小军、小强、小李、小郑、小张、大拿.......
这些名字在同一行，中间以中文顿号隔开。现在的需求是，如何以顿号为分隔符，将他们分行，一个名字占一行。即类似于2.txt：
小明
小红
小军
.....
处理文稿时，很多时候会遇到这样的场景，但一直不知如何解决，特向各位求教，谢谢！
另外，如果已经有一个2.txt，想转成1.txt的样子，又该如何处理？
Last edited by Billunique on 2007-11-21 at 10:05 AM ]
|
★①②③④⑤⑥⑦⑧⑨⑩㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩ⅠⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫ【●】→←↑↓▲ |
|
 2007-11-16 18:32 |
|
|
knoppix7
银牌会员
积分 1287
发帖 634
注册 2007-5-2
来自 cmd.exe
状态 离线
|
『第 2 楼』:
使用 LLM 解释/回答一下
鄙人不才:
先把文件里所有的、替换成, 然后保存
然后用
@echo off
for /f "eol=; tokens=1* delims=龓" %%i IN (1.txt) DO (
for %%a IN (%%i) DO echo %%a>>2.txt
)
pause
完成转换...
|
|
|
2007-11-16 19:12 |
|
|
terse
银牌会员
积分 2404
发帖 946
注册 2005-9-8
状态 离线
|
『第 3 楼』:
使用 LLM 解释/回答一下
@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in (test1.txt) do (
set src=%%i
set src=!src:、= !
for %%a in (!src!) do ECHO %%a
)
pause
@echo off
for /f %%a in (test2.txt) do set/p =%%a、<nul
pause
Last edited by terse on 2007-11-16 at 07:42 PM ]
|
简单!简单!再简单! |
|
|
2007-11-16 19:41 |
|
|
lxmxn
版主
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
1 、1.txt ==》2.txt
@echo off&Setlocal
for /f "delims=" %%a in (1.txt) do call :loop "%%a"
pause
exit/b0
:loop
for /f "tokens=1* delims=、" %%a in ("%~1") do (
>>2.txt echo %%a
call :loop "%%b"
)
2、2.txt==》1.txt
@echo off&setlocal
for /f "delims=" %%a in (2.txt) do set/p=%%a、<nul>>1.txt
|
|
|
2007-11-16 19:45 |
|
|
zh159
金牌会员
积分 3687
发帖 1467
注册 2005-8-8
状态 离线
|
『第 5 楼』:
使用 LLM 解释/回答一下
我也来一个
1.txt ==》2.txt
@echo off
:loop
set /a n+=1
for /f "tokens=%n%* delims=、" %%a in (1.txt) do echo %%a&&if not "%%a" == "" goto loop
pause
exit
Last edited by zh159 on 2007-11-17 at 12:14 AM ]
|
 |
|
|
2007-11-17 00:12 |
|
|
lxmxn
版主
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
|
|
2007-11-17 00:21 |
|
|
zh159
金牌会员
积分 3687
发帖 1467
注册 2005-8-8
状态 离线
|
『第 7 楼』:
使用 LLM 解释/回答一下
多行的：
@echo off
for /f "delims=" %%a in (1.txt) do set n=0&&call :loop "%%a"
pause
exit
:loop
set /a n+=1
for /f "tokens=%n% delims=、" %%a in (%1) do echo %%a&&if not "%%a" == "" goto loop
goto :eof
|
|
|
|
2007-11-17 00:32 |
|
|
Billunique
中级用户
菜鸟总动员
积分 259
发帖 112
注册 2006-8-28
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
哈哈，多谢各位兄台！这两天忙没有上来看，上来一看真兴奋，问题已经被解决得这么好！
3楼的帅气，4楼的深厚，5楼的巧妙，我可真是想不出来啊！
当时一个朋友给我说了个PHP的解法，贴出来一下，不会挨骂吧，呵呵
<?php
$str=file_get_contents('1.txt');
$ar=explode("、", $str);
$fp=fopen('2.txt', 'ab');
foreach($ar as $key => $word)
fwrite($fp, $word."\r\n");
fclose($fp);
?>
|
★①②③④⑤⑥⑦⑧⑨⑩㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩ⅠⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫ【●】→←↑↓▲ |
|
|
2007-11-20 21:36 |
|
|
zh159
金牌会员
积分 3687
发帖 1467
注册 2005-8-8
状态 离线
|
『第 9 楼』:
使用 LLM 解释/回答一下
VBS的
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("1.txt",1)
str = Replace(f.ReadAll,"、",vbCrLf)
f.Close
Set f = fso.CreateTextFile("2.txt",2,Turn)
f.WriteLine str
f.Close
|
|
|
|
2007-11-21 00:25 |
|
|
bjsh
银牌会员
积分 2000
发帖 621
注册 2007-1-1
状态 离线
|
『第 10 楼』:
使用 LLM 解释/回答一下
sed
1.
sed 's/、/\n/g' 1.txt
2.
sed ':a;$q;H;N;s/\n/、/;ba' 2.txt
awk
1.
awk -F'、' '{for (i=1;i<=NF;i++) {print $i}}' 1.txt
2.
awk '{printf $0"、"}' 2.txt
|
|
|
2007-11-21 13:36 |
|
|
jmz573515
银牌会员
积分 1212
发帖 464
注册 2006-12-13
状态 离线
|
『第 11 楼』:
使用 LLM 解释/回答一下
@echo off
for /f "delims=" %%i in (1.txt) do (
set str=%%i
)
set str=%str:、=^&echo.%
echo %str%
pause
此帖被 +1 点积分 点击查看详情 | 评分人：【 upsco 】 | 分数： +1 | 时间：2007-11-22 13:56 |
|
|
|
|
2007-11-22 13:50 |
|
|
zysheng110
初级用户
积分 31
发帖 16
注册 2007-10-24
状态 离线
|
|
|
2007-11-23 00:32 |
|
|
zh159
金牌会员
积分 3687
发帖 1467
注册 2005-8-8
状态 离线
|
『第 13 楼』:
使用 LLM 解释/回答一下
Originally posted by jmz573515 at 2007-11-22 13:50:
@echo off
for /f "delims=" %%i in (1.txt) do (
set str=%%i
)
set str=%str:、=^&echo.%
echo %str%
pause
这个输出有问题，只能输出最后一行最后一个
改一下：
@echo off
for /f "delims=" %%i in (1.txt) do (
set str=%%i
call :loop
)
pause
exit
:loop
set str=%str:、=^&^>^>2.txt echo.%
>>2.txt echo.%str%
goto :eof
其实和VBS的把“、”替换成回车换行符差不多
|
|
|
|
2007-11-23 01:19 |
|
