asp实现读取数据库输出json代码

        Rs.open CountSql,Conn,1,1
        Counts=Rs(0)
        Rs.Close
        GetTable=ToMiniUi(TmpJson,Counts)
    Else
        GetTable=toJson(TmpJson)
    end if
    Set Rs=nothing
End Function
function toJson(JsonStr)
    toJson="[" & vbcrlf & JsonStr & vbcrlf & "]"
end function
Function ToMiniUi(JsonStr,total)
    ToMiniUI="{"
    ToMiniUI=ToMiniUI & """total"":"" " & total & """," & vbcrlf
    ToMiniUI=ToMiniUI & """data"": [" & JsonStr
    ToMiniUI=ToMiniUI & "]}"
End Function

PS：最后的参数是针对miniUI开发的,可以无视

以上就是本文的全部内容了，希望大家能够喜欢。

您可能感兴趣的文章:

js读取json文件片段中的数据实例使用MSScriptControl 在 C# 中读取json数据的方法Android通过json向MySQL中读写数据的方法详解【读取篇】如何使用ajax读取Json中的数据PHP读取mssql json数据中文乱码的解决办法Android App中读取XML与JSON格式数据的基本方法示例js读取并解析JSON类型数据的方法Android中Json数据读取与创建的方法python读取json文件并将数据插入到mongodb的方法litjson读取数据示例javascript 循环读取JSON数据的代码JSON 数据格式详解