I copied the data from your first post to a file on my disk and ran the following code:
vb.net Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim fileData = File.ReadAllText("C:\Temp\test.txt") fileData = fileData.Replace("[""", """") fileData = fileData.Replace("""] = ", """ : ") fileData = Regex.Replace(fileData, "([^\s]),(\s+})", "$1$2") Debug.Print(fileData) End Sub
Output
I think this is good JSON string and now your parser should work with this new string (assuming whole of your file is formatted the same way you showed in first post).Code:TableName = { "QuotedString" : { "QuotedString" : { "QuotedString-Key" : 1, "QuotedString-Key" : 0, "QuotedString-Key" : 0 }, "QuotedString" : { "QuotedString-Key" : 1, "QuotedString-Key" : 0, "QuotedString-Key" : 0 }, }, "QuotedString-Key" : true, "QuotedString-Key" : true }




icon on the left of the post.
Reply With Quote