@echo off
rem "批处理保存为utf-8编码格式"
chcp 65001 >nul
cd /d "%~dp0"
set "file=D:\20240526080607480603.xml"
set "_"CPCIssueOrg"=    "
set "_"EnTime"=时间："
set "_"CPUVlp"=IC卡车牌："
set "_"EnVLP"=入口车牌："
set "_"OBUVlp"=OBU车牌："
set "_"VLP"=出口车牌："
(for /f "delims=" %%a in ('powershell -Command "(Get-Content '%file%' -Encoding UTF8) -replace '"', [Environment]::NewLine" ^|findstr /rvb "; , :"') do (
	if defined _"%%a" (
		call set str=%%_"%%a"%%
	) else if defined str (
		call echo=%%str%%%%a
		set str=
	)
))>"out.txt"
pause
复制代码

@echo off &setlocal enabledelayedexpansion &chcp 65001>nul
for %%c in ("CPCIssueOrg:车站名称", "EnTime:时间", "CPUVlp:IC卡车牌", "EnVLP:入口车牌", "OBUVlp:OBU车牌", "VLP:出口车牌") do for /f "tokens=1-2 delims=:" %%1 in ("%%~c") do (set "%%~1=%%~2")
(for /f "usebackq skip=9 delims=" %%a in ("d:\xml\test.xml") do (
	set "s=%%a"&for %%k in ("CPCIssueOrg", "EnTime", "CPUVlp", "EnVLP", "OBUVlp", "VLP") do (
		set "v=!s:*%%k=!"&for /f tokens^=^1^delims^=^" %%b in ("!v:~2,25!") do echo,!%%~k!：%%b
	)
	chcp 936>nul&endlocal&exit/b
))>"d:\xml\test.txt"
复制代码

@echo off &setlocal enabledelayedexpansion
for %%c in ("CPCIssueOrg:车站名称", "EnTime:时间", "CPUVlp:IC卡车牌", "EnVLP:入口车牌", "OBUVlp:OBU车牌", "VLP:出口车牌") do for /f "tokens=1-2 delims=:" %%1 in ("%%~c") do (set "%%~1=%%~2")
(for /f "usebackq skip=9 delims=" %%a in ("d:\xml\test.xml") do (
	set "s=%%a"&for %%k in ("CPCIssueOrg", "EnTime", "CPUVlp", "EnVLP", "OBUVlp", "VLP") do (
		set "v=!s:*%%k=!"&for /f tokens^=^1^delims^=^" %%b in ("!v:~2,25!") do echo,!%%~k!：%%b
	)
	endlocal&exit/b
))>"d:\xml\test.txt"
复制代码

$ht = @{
	"CPCIssueOrg" = "车      ："
	"EnTime"      = "时间    ："
	"CPUVlp"      = "IC卡车牌："
	"EnVLP"       = "入口车牌："
	"OBUVlp"      = " OBU车牌："
	"VLP"         = "出口车牌："
}

$filename = ".\20240526080607480603.xml"
[xml]$xml = Get-Content -Path $filename -Encoding "UTF8"
$xml.datas.data.attribute | ForEach-Object {
	if ( $_.name -eq "msg" ) { $string = $_.value }
}
$string = $string.Substring(1,$string.length-2)
$string = $string -replace '(?<="),',"`n"
$string = $string -replace '"(\w+)":"(.*)"',"`$1`t`$2"
$as = $string -split "`n"

$as | ForEach-Object {
	$a = $_ -split "`t"
	if ( $ht[$a[0]] ) {
		Write-Host ( "{0}   {1}" -f $ht[$a[0]] , $a[1] )
	}
}
复制代码

$as | ForEach-Object {
	$a = $_ -split "`t"
	if ( $ht[$a[0]] ) {
		"{0}   {1}" -f $ht[$a[0]] , $a[1]
	}
} | Out-File z.txt
复制代码

$ht = @{
	"CPCIssueOrg" = "车      ："
	"EnTime"      = "时间    ："
	"CPUVlp"      = "IC卡车牌："
	"EnVLP"       = "入口车牌："
	"OBUVlp"      = " OBU车牌："
	"VLP"         = "出口车牌："
}


function get-info() {
	param(
		[string]$filexml ,
		[string]$filetxt
	)
	
	[xml]$xml = Get-Content -Path $filexml -Encoding "UTF8"
	$xml.datas.data.attribute | ForEach-Object {
		if ( $_.name -eq "msg" ) { $string = $_.value }
	}
	$string = $string.Substring(1,$string.length-2)
	$string = $string -replace '(?<="),',"`n"
	$string = $string -replace '"(\w+)":"(.*)"',"`$1`t`$2"
	$as = $string -split "`n"

	$as | ForEach-Object {
		$a = $_ -split "`t"
		if ( $ht[$a[0]] ) {
			"{0}   {1}" -f $ht[$a[0]] , $a[1]
		}
	} | Out-File $filetxt
}


$Path = "C:\Users\admin\Desktop"

Get-ChildItem -Path $Path -Filter "*.xml" | ForEach-Object {
	get-info $_.FullName ( $_.DirectoryName + "\" + $_.BaseName + ".txt")
}
复制代码

$ht = [Ordered]@{
	CPCIssueOrg = "车      ："
	EnTime      = "时间    ："
	CPUVlp      = "IC卡车牌："
	EnVLP       = "入口车牌："
	OBUVlp      = "OBU 车牌："
	VLP         = "出口车牌："
}

$str = $ht.values -join "`n"

function get-info() {
	param(
		[string]$filexml ,
		[string]$filetxt
	)
	
	[xml]$xml = Get-Content -Path $filexml -Encoding "UTF8"
	$xml.datas.data.attribute | ForEach-Object {
		if ( $_.name -eq "msg" ) { $string = $_.value }
	}
	$string = $string.Substring(1,$string.length-2)
	$string = $string -replace '(?<="),',"`n"
	$string = $string -replace '"(\w+)":"(.*)"',"`$1`t`$2"
	$as = $string -split "`n"
	
	$as | ForEach-Object {
		$a = $_ -split "`t"
		if ( $ht[$a[0]] ) {
			$str = $str -replace ( "(?m)^" + $ht[$a[0]] + ".*$" ), ( "{0}   {1}" -f $ht[$a[0]] , $a[1] )
		}
	}
	$str | Out-File $filetxt
}


$Path = "C:\Users\admin\Desktop"

Get-ChildItem -Path $Path -Filter "*.xml" | ForEach-Object {
	get-info $_.FullName ( $_.DirectoryName + "\" + $_.BaseName + ".txt")
}
复制代码