@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%i in (%*) do (
set /a n+=1
set !n!line=%%i
if !n! equ 2 (
echo !1line! !2line!>>result.txt
set /a n=0
)
)
endlocal

可以依次类推把每n行合并成一行。

Last edited by wydos on 2006-12-11 at 01:58 AM ]

这个也叫原创,相似的内容好久前就有了!!
http://www.cn-dos.net/forum/viewthread.php?tid=23312&fpage=1&highlight=%2Blotus516

真是惭愧呀！！！
不过这是我昨天处理文本时想出来的，还不知道有类似的贴：
http://www.cn-dos.net/forum/view ... ghlight=%2Blotus516
搜贴时关键词没用好！
惭愧！！
惭愧！！
还请版主把它删掉！

　　其实没必要删除主题，把 [原创] 字样取消，然后再把代码的功能增强一点(如何增强请自己想，我还没想到该如何增强^_^)，这样就不会和以前的内容重复了。

不必删掉，代码又没有指定版权，难道写出来绝对不能与别人相似吗？
只要是自己努力学习的结果，何必在乎这些呢？

谢谢 5 楼的鼓励！
关于代码的功能增强，感觉没有思路

改了一下：
把两行合并和n行合并统一
@echo off
setlocal enabledelayedexpansion
echo 请问你要每几行合并成一行，请输入数字,回车确定！
@set /p m=
for /f "tokens=*" %%i in (%*) do (
set /a n+=1
set line=!line!%%i
if !n! equ !m! (
echo !line!>>result.txt
set line=
set /a n=0
)
)
endlocal

我试了一下，好像最后不足几行时不能合并甚至不显示。
例如每两行合并，若为奇数，最后一行result.txt中没有，
即：每n行合并，若总行数不是n的整数倍数，则余下的行里的内容不被合并显示。

不知是否只有我的机子这样。

情况确实如ccwan所说的。
应该在代码中加个求余的判断

改了一下：

@echo off

setlocal enabledelayedexpansion

echo 请问你要每几行合并成一行，请输入数字,回车确定！

@set /p m=

for /f "tokens=*" %%i in (%*) do (

set /a hangn+=1

set /a n+=1

set line=!line!%%i

if !n! equ !m! (

echo !line!>>result.txt

set line=

set /a n=0

)

)

rem 以下代码用于处理剩下的行

set /a t=!hangn!%%!m!

if !t! equ 0 goto end

echo !line!>>result.txt

:end

endlocal

不知大家有没有更好的代码

Last edited by wydos on 2006-12-11 at 04:56 AM ]

试过了，成功。

@echo off

    setlocal enabledelayedexpansion

rem 下面的文件名若包含空格注意加引号

    set file=a.txt

    for /f "delims=: tokens=1*" %%i in ('findstr /n .* %file%') do set num=%%i && set "%%i=%%j"

    

    echo 显示全部:

    for /l %%i in (1,1,%num%) do echo,!%%i!

    pause



    echo 显示单数行:

    for /l %%i in (1,2,%num%) do echo,!%%i!

    pause



    echo 显示双数行:

    set "num_ex="

    set /a num_ex=%num% + 1

    for /l %%i in (2,2,%num_ex%) do echo,!%%i!

    pause



    echo 每两行合并:

    set str=

    for /l %%i in (1,1,%num%) do (

        if defined str (echo,!str!!%%i!&&set "str="

                       ) else (

                               set "str=!%%i!"

                               )

    )

    echo,!str! && set "str="

    pause



    echo 显示前10行:

    for /l %%i in (1,1,10) do if defined %%i echo,!%%i!

    pause

exit /b 0

因为处理字符的工作都是用vbs来完成，所以上面的代码未测试，只为提供思路。

Originally posted by lotus516 at 2006-12-11 12:11 AM:
这个也叫原创,相似的内容好久前就有了!!
http://www.cn-dos.net/forum/viewthread.php?tid=23312&fpage=1&highlight=%2Blotus516

我感觉这句话有问题，只要不是抄袭别人的，自己做出来的，都是应该是原创吧？好像原创并没规定不可以相同吧？
纯属灌水，老兄别在意啊！！！！<img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-raspberry.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0"> <img src="images/smilies/face-wink.png" align="absmiddle" border="0">