Would like some help with JSON & vb script

Joined
Oct 16, 2018
Messages
1,663
Reaction score
5,470
Location
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
 
Joined
Nov 3, 2017
Messages
29
Reaction score
6
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:

jaydeel

BIT Beta Team
Joined
Nov 9, 2016
Messages
1,126
Reaction score
1,237
Location
SF Bay Area
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.
 
Joined
Oct 16, 2018
Messages
1,663
Reaction score
5,470
Location
Florida, USA
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
 
Top