ParseJSON TypeMismatch Error

I’m getting a TypeMismatchException error “Expected Object but got Auto” while attempting to parse json Data.

The json is text brought in by Handle Special URL as

Dim data As Text = DefineEncoding(Request.Entity, Encodings.UTF8).ToText

I get the described error on
Dim jsonDict as Xojo.Core.Dictionary = Xojo.Data.ParseJSON(Data)

This is the json Data

[{“clock_id”:“C98”,“clock_location”:"",“clock_position”:“12500”,“clock_time”:“2017-06-28 13:14:15”,“clock_type”:“IN”,“emp_id”:“318025912024170104”,“emp_pic”:"",“rec_id”:“84F18A3C-253C-44D3-a050-170628131414”},{“clock_id”:“C98”,“clock_location”:"",“clock_position”:"",“clock_time”:“2017-06-28 13:19:18”,“clock_type”:“OUT”,“emp_id”:“318025912024170104”,“emp_pic”:"",“rec_id”:“8D238784-AC84-42C0-aA80-170628132017”},{“clock_id”:“C98”,“clock_location”:"",“clock_position”:“12501”,“clock_time”:“2017-06-28 13:20:18”,“clock_type”:“IN”,“emp_id”:“318025912024170104”,“emp_pic”:"",“rec_id”:“06671032-4D32-4681-a099-170628132017”},{“clock_id”:“C98”,“clock_location”:"",“clock_position”:“12501”,“clock_time”:“2017-06-28 15:41:39”,“clock_type”:“IN”,“emp_id”:“318025912024170104”,“emp_pic”:"",“rec_id”:“F33BD6ED-C8ED-43FD-a96E-170628154139”},{“clock_id”:“C98”,“clock_location”:"",“clock_position”:"",“clock_time”:“2017-06-28 15:45:28”,“clock_type”:“OUT”,“emp_id”:“318025912024170104”,“emp_pic”:"",“rec_id”:“6AC6E4D4-58D4-4AE7-a1C7-170628154528”}]

Can someone explain what I’m doing wrong and I know it is probably something simple

Thanks

The first character of your JSON data is a “[”. This indicates that the JSON is actually an array. Each array element contains a JSON object (a dictionary).

So you’ll need to do something like this:

[code]Dim jsonArray() As Auto = Xojo.Data.ParseJSON(Data)

For Each jsonDict As Xojo.Core.Dictionary In jsonArray
Dim clockID As Text = jsonDict.Value(“clock_id”)
Next[/code]

Thanks, I knew it would be something simple