@echo off
(
	for /f "delims=" %%i in (0.txt) do echo %%i | findstr "@" >nul 2>nul && echo %%i || set /p="%%i,"<nul
) > new.txt
pause
复制代码

    061611ma----一星会员----注册时间：2019-07-30 01:44
0611ma----061611Ma----
369100l----一星会员----注册时间：2019-03-05 02:49
369100l----364100L----
a10059581----一星会员----注册时间：2019-08-01 10:33
a10059581----A15459581----
a36987250----一星会员----注册时间：2019-03-13 19:30
a36987250----A3698741250----
a9520----一星会员----注册时间：2019-03-27 14:36
a9520----A9520----
as7433----一星会员----注册时间：2018-10-11 09:30
as7433----As7433----
bmaohulala----一星会员----注册时间：2019-03-15 18:23
bmaohulala----Aa4219114----
c877848----一星会员----注册时间：2019-03-07 05:33
c877848----C877848----
chyul998----一星会员----注册时间：2019-08-13 04:09
chyul998----19528Cy----
cwbs001----一星会员----注册时间：2019-07-28 00:27
cwbs001----Jy032646----
复制代码

for /f "delims=" %%i in (0.txt) do echo %%i | findstr "会员" >nul 2>nul && echo %%i || set /p="%%i,"<nul
复制代码

[regex]::replace(((gc '.\0.txt' -enc utf8) -join "`r`n"),"([^`r`n]+)`r?`n([^`r`n]+`r?`n?)",'$1,$2')|sc '.\new.log';
复制代码

@echo off
@setlocal enabledelayedexpansion

set /P fin=请输入读取的文件名
set /P fout=请输入输出的文件名

if not exist %fin% (
    echo 文件不存在
    exit /B
)

set "double=false"
set "str="

for /F "tokens=*" %%i in (%fin%) do (
    if "!double!"=="false" (
        set "str=%%i"
        set "double=true"
    ) else (
        set "str=!str! , %%i"
        set "double=false"
        echo !str! >> %fout%
    )
)
复制代码

sed "$!N;s/\n/，/" "原文件.txt" > "结果.txt"
复制代码