Would like some help with JSON & vb script

Oct 16, 2018
1,924
6,531
Florida, USA
If someone could post a simple vb script or Vusual Basic showing how to make a BI JSON call and receive the response I would really appreciate it.

Thanks
 
Wish I could help. I've never been able to read a status with Json.
The only thing I've able to read is the traffic light status and the current profile (without Json).
Edited to add that you can also read the current main schedule "lock" status.


' here's how you determine if Blue Iris's signal light is red in VBscript
Dim a
' Check to see if the Blue Iris signal is red
a = CreateObject("MSXML2.XMLHTTP")
a.open("GET", "http://YourLocalHostName:YourLocalHostPort/admin?", False)
a.send()

Dim strSearchString, strSearchFor
strSearchString = a.responseText
strSearchFor = "signal=red"
' Look for "signal=red" in string
If InStr(1, strSearchString, strSearchFor) > 0 Then
' Your code here
End If
 
Last edited:
I don’t currently use vb script, but awhile back I posted php code that I’ve used to communicate with the server


If you get no better response perhaps it can help get you get started.
 
  • Like
Reactions: JNDATHP
I don’t currently use vb script, but awhile back I posted php code that I’ve used to communicate with the server


If you get no better response perhaps it can help get you get started.

I would appreciate a link