![](/img/smilies/icon_biggrin.gif)
Наверное, самый маленький парсер json ответа веб-сервера.
Add(MainForm,15175452,147,147)
{
Visible=1
link(onCreate,4794102:doString,[])
}
Add(WinExec,11401622,259,147)
{
FileName="powershell"
Mode=0
Action="runas"
Point(doConsoleExec)
Point(doConsoleInput)
Point(onConsoleTerminate)
link(onConsoleTerminate,15175452:doClose,[(298,167)(298,202)(137,202)(137,174)])
}
Add(FormatStr,4794102,203,161)
{
DataCount=1
Mask="$response = Invoke-WebRequest -Uri "%1" -UseBasicParsin\r\n$json = ConvertFrom-Json -InputObject $response.Content\r\n$valute = $json.Valute \r\n$valute.psobject.properties.value | Out-GridView -Title 'Json to table' -Wait\r\n\r\n"
link(onFString,11401622:doConsoleExec,[])
link(Str1,11141527:Text,[])
}
Add(VisualStrings,11141527,203,105)
{
Lines=#42:https://www.cbr-xml-daily.ru/daily_json.js|
Width=214
Height=25
}
Должна работать на всех windows10(на других не проверял.)