[vb.net] JSON을 VB.NET에서 파싱하기

보통 웹프로그래밍을 하다보면 json( JavaScript Object Notation )으로 찎찎 쏴준다..

믈론 mid, split left right instr replace 노가다로 구할 수 있으나, 귀찮음과 안정성을 위해 정석인 방법을 알아보았다,

csjson을 이용하면된다.

일단 http://sourceforge.net/projects/csjson/ 에서 다운로드할 수 있다.

msi 이니깐 적당히 설치하고 프로젝트 설정에서 System.Net.Json.dll을 찾아서 참조해주면된다.

설명은 귀찮으니, 예제를 보는것으로 대체하겠다

일단 strBuf에는 텍스트로된 JSON배열이 있다.


        Dim jcResults As New System.Net.Json.JsonTextParser
        Dim jResults As System.Net.Json.JsonObjectCollection

        jResults = jcResults.Parse(strBuf)

        jUser = jResults(2)

        For Each jTok As System.Net.Json.JsonObjectCollection In jUser

            frmMnu1.lstON.Items.Add(jTok(0).GetValue, jTok(1).GetValue, 0)

        Next참 쉽죠?

그런데 왜 자바에선 eval()과 앞뒤에 (, )를 넣어주는지는 모르겠다.

물론 vb.net에선 안넣어주어도 된다,