rem 另存为 ANSI 编码 bat
' & cls & cscript.exe /nologo /e:vbscript "%~f0" %* & pause & exit /b

f = "entry.json"    '源文件
u = "UTF-8"         '源文件的编码

Set oWshShell = CreateObject("WScript.Shell")
Set oFSO = CreateObject("Scripting.FileSystemObject")
s = oFSO.GetParentFolderName(WScript.ScriptFullname)
oWshShell.CurrentDirectory = s
Set oRegExp = New RegExp
oRegExp.Global     = True
oRegExp.MultiLine  = True
oRegExp.IgnoreCase = True
oRegExp.Pattern    = """title"":"".*?"""
Set oStream = CreateObject("ADODB.Stream")
oStream.Type    = 2    'adTypeText
oStream.Mode    = 3    'adModeReadWrite
oStream.Charset = u
oStream.Open()
oStream.LoadFromFile f
s = ""
For Each oMatch In oRegExp.Execute(oStream.ReadText())
    wsh.Echo oMatch.Value
Next
复制代码

@echo off & powershell "$p=((gc 'entry.json' -raw -enc 'utf8') -match '[^"""]+(?=""","""type_tag""")');$matches[0]">"0.0"&set/p v=<"0.0"
echo,%v%&del/q "0.0"&pause&exit/b
复制代码