中国DOS联盟

小明、小红、小军、小强、小李、小郑、小张、大拿.......

小明
小红
小军
.....

@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

@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"
)

@echo off&setlocal
for /f "delims=" %%a in (2.txt) do set/p=%%a、<nul>>1.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

@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

<?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);
?>

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

@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