asp中把数据表映射成ajax可调用的json格式的方法

<!--#include file="Conn.asp" -->
<!--#include file="MiantuanJson.asp" -->
<%
"MtRecToJson的使用范例
"作者:miantuan.net
"email:ray@miantuan.net
"qq:12694448
"交流区:http://www.miantuan.net
ConnectionDatabase
dim myrs,sqlstr,id,singleJson
Set myrs=Server.CreateObject("ADODB.recordset")
id = request("id")
if id="" then
id = "0"
end if
sqlstr = "select * from t_jsontable where jt_id="&id
set myrs = conn.execute(sqlstr)
"实例化一个MtRecToJson类的对象
set singleJson = new MtRecToJson
"把recordset对象set给singleJson singleJson.setRecordset(myrs)
"调用getOneJsonDB方法输出JSON response.write singleJson.getOneJsonDB()
if not IsEmpty(myrs) then
myrs.close
set myrs = nothing
end if
conn.close
set conn = nothing
%>

{"jt_id":"1","jt_name":"麦兜","jt_createtime":"2009-12-7 15:01:40"}

<!--#include file="Conn.asp" -->
<!--#include file="MiantuanJson.asp" -->
<% ConnectionDatabase
dim myrs,sqlstr,singleJson,page,pagesize,sort
dim n,v
Set myrs=Server.CreateObject("ADODB.recordset")
page=Replace(Request.QueryString("page"),""","""")
pagesize=Replace(Request.QueryString("pagesize"),""","""")
sort=Replace(Request.QueryString("sort"),""","""")
n=Replace(Request.QueryString("n"),""","""")
v=Replace(Request.QueryString("v"),""","""")
If v="" then v=0
if sort="1" then
sort = "desc"
elseif sort = "2" then
sort = "asc"
else
sort = "desc"
end if
If page="" then page=1
If pagesize="" then pagesize=20
sqlstr = "select * from t_jsontable"
if n<>"" then
sqlstr = sqlstr & " where " & n & "=" & v
end if
sqlstr = sqlstr & " order by jt_id "&sort
myrs.Open sqlstr,Conn,1.1
if myrs.recordcount<>0 then
myrs.pageSize = pagesize
myrs.AbsolutePage = page
end if
"实例化一个MtRecToJson类的对象
set singleJson = new MtRecToJson
"把recordset对象set给singleJson
singleJson.setRecordset(myrs)
"调用getListJsonDB方法输出JSON
response.write singleJson.getListJsonDB()
if not IsEmpty(myrs) then
if myrs.State>0 then
myrs.close
end if
set myrs = nothing
end if
conn.close
set conn = nothing
%>

{"count":"4",items:[{"jt_id":"5","jt_name":"嚷嚷","jt_createtime":"2009-12-8 17:12:22"},{"jt_id":"4","jt_name":"闪烁","jt_createtime":"2009-12-8 17:12:19"},{"jt_id":"2","jt_name":"帽子","jt_createtime":"2009-12-7 23:20:29"},{"jt_id":"1","jt_name":"麦兜","jt_createtime":"2009-12-7 15:01:40"}]