[VVi3ard]

В итоге сделал часть скрипта на VBS (исходники гаджета прилагаю)

То чего хотел добился все работает четко.

Возникла новая проблема. хочу теперь выводить текст: из тега "technicalSummary" но он в json кодировке, не могу понять как силами VBS его перевести в обычный текст... (Напомню что я делаю гаджет для win7)

Вот функция на VBS

Function objXML_onreadystatechange()
    If (objXML.readyState = 4) Then
    	'msgbox objXML.statusText
		If (objXML.status = 200) Then
		  s = objXML.responseText
		  
		  StartUSD = InStr(1,s,"summaryLast")
		  USDS = Mid(s,StartUSD+14,6)	
		  StartTime = InStr(StartUSD,s,"time")
		  TimeS = Mid(s,StartTime+18,8)	
		  
		  StartText = InStr(1,s,"technicalSummary")+19
		  
		  EndText = InStr(StartText,s,"""")
		  
		  TextS = Mid(s,StartText,EndText-StartText)	
		  'ResText = json_decode(TextS)

		  
		  document.getElementById("summaryLast").innerHTML = USDS
		  document.getElementById("Time").innerHTML = TimeS
		else 
		  'msgbox objXML.statusText
		  document.getElementById("summaryLast").innerHTML = "" 'убираем индикатор загрузки
		End If
  End If
  
End Function

Нужно тарабарщину из TextS превратить в нормальный текст...