#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

(dir *.txt |  %{
$txt = [Io.File]::ReadAllText("$_",[Text.Encoding]::UTF8)
$date = [Regex]::Match($txt, "日期：\d+")
$question = [Regex]::Match($txt, "问题：\d+")
$method = [Regex]::Match($txt, "方法：\d+")
($date.Value,$question.Value,$method.Value) -join "`t"
} )| tee new.csv
复制代码

@echo off
setlocal enabledelayedexpansion
(for /f "delims=" %%a in ('dir /b /a-d *.txt') do (
    set "str="
    for /f "delims=" %%b in ('type "%%a"') do (
        set "line=%%b"
        if "!line:日期：=!" neq "!line!" (
            set "str=!str!,%%b"
        ) else if "!line:问题：=!" neq "!line!" (
            set "str=!str!,%%b"
        ) else if "!line:方法：=!" neq "!line!" (
            set "str=!str!,%%b"
        )
    )
    echo,!str:~1!
))>"1.csv"
复制代码