从经典的asp返回json数组

时间:2014-08-18 17:45:21

标签: json asp-classic

我从经典asp返回html。这是我的代码: -

<% ListFolderContents(Server.MapPath("/userfiles")) %>
<% sub ListFolderContents(path)

 dim fs, folder, file, item, url

 set fs = CreateObject("Scripting.FileSystemObject")
 set folder = fs.GetFolder(path)
 Response.Write("<h2>"& folder.Name &"</h2>")
 for each item in folder.SubFolders
            ListFolderContents(item.Path)
 next
 Response.Write("<ul>")
 for each item in folder.Files

    Response.Write("<li><a>" & item.Name & "</a></li>")
 next
    Response.Write("</ul>")
 end sub
%>

但我想返回json数组。我是新手,任何人都可以通过任何链接或任何示例指导我。

感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

嗯,我在ASP中做过这件事,并不是很有趣。您需要手动构建使用您要查找的层次结构格式化的json字符串。您可以在google中找到格式化json的大量方向。

以下是来自http://json.org/example

的格式化json的一个示例
{"menu": {
  "id": "file",
  "value": "File",
  "popup": {
    "menuitem": [
      {"value": "New", "onclick": "CreateNewDoc()"},
      {"value": "Open", "onclick": "OpenDoc()"},
      {"value": "Close", "onclick": "CloseDoc()"}
    ]
  }
}}

之后,我建议的唯一ASP特定的事情就是将其添加到构建响应的代码中。

response.ContentType="application/json"