摸索了一整天天,今天终于有所收获,打印出数据了,分享一下:
1.index.html
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<script language="JavaScript" type="text/javascript" src="js/jquery-1.3.2.min.js"></script>
<script language="JavaScript" type="text/javascript">
$(document).ready(function(){$.getJSON("data.asp", function(data){
$.each(data, function(i,data){
$("#images").html($("#images").html()+"<li>"+i+" "+data.newsTitle+"</li>");
});
});
});
</script>
</head>
<body>
<ul id="images"></ul>
</body>
</html>
2.data.asp
<!--#include file="conn.asp"-->
<!--#include file="JSON_2[1].0.2.asp"-->
<!--#include file="JSON_UTIL_0[1].1.1.asp"-->
<%=QueryToJSON(conn, "select id,newsTitle,newsBtype,newsStype,UpdateTime,newsAuthor,SchoolLink from news order by UpdateTime desc").Flush%>
其中JSON_UTIL_0[1].1.1.asp和JSON_2[1].0.2.asp 可以到json.org上下载
3.conn.asp
<%
dim conn,connstr
set conn=server.createobject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("data/data.mdb")
err.clear
conn.open(connstr)
if err then
set conn=nothing
response.write "数据库连接错误!"
response.end
end If
%>
数据库部分俺就不贴出来了 ,就那么几个字段。jquery-1.3.2.min.js可以到http://jquery.com 去下载一个