一尘不染

是否有VB6 / VBA的JSON解析器?

json

我正在尝试在VB6中使用Web服务。该服务-由我控制-当前可以返回SOAP /
XML消息或JSON。我有一个非常困难的时候搞清楚,如果VB6的SOAP类型(第1版)可以处理返回object-而不是简单的类型,如stringint等。到目前为止,我想不出什么,我需要做的就是VB6与返回玩对象。

所以我想我可以将Web服务中的响应序列化为JSON字符串。VB6是否存在JSON解析器?


阅读 440

收藏
2020-07-27

共1个答案

一尘不染

请访问JSON.org,以多种语言查看JSON解析器的最新列表(请参阅主页底部)。在撰写本文时,您将在此处看到指向几个不同的JSON解析器的链接,但是只有一个用于VB6
/ VBA(其他是.NET):

  • VB-JSON

    • 当我尝试下载zip文件时,Windows表示数据已损坏。但是,我能够使用7-zip提取文件。事实证明,Windows无法将zip文件中的主要“文件夹”识别为文件夹,通过7-zip可以看到该主要“文件夹”的内容,因此您可以将其打开然后相应地提取文件。
    • 这个VB JSON库的实际语法非常简单:

          Dim p As Object
      

      Set p = JSON.parse(strFormattedJSON)

      ‘Print the text of a nested property ‘
      Debug.Print p.Item(“AddressClassification”).Item(“Description”)

      ‘Print the text of a property within an array ‘
      Debug.Print p.Item(“Candidates”)(4).Item(“ZipCode”)

    • 注意:我必须通过VBA编辑器中的“工具”>“引用”将“ Microsoft脚本运行时”和“ Microsoft ActiveX数据对象2.8”库添加为引用。

    • 注意:VBJSON代码实际上是基于Google代码项目vba-json的。但是,VBJSON承诺会从原始版本中修复一些错误。
2020-07-27