转自Stone36.com
现在AJAX的应用越来越广泛,我网站的数据读取部分就使用了这样的技术,它可以让页面在无刷新的情况下进行翻页、搜索等操作,这样会让用户感觉你的网站速度很快。很多人都在自己的网页中加入这样的技术,那么如何在ASP中使用AJAX呢?其实只要动态生成一个XML文件,然后用JavaScrip读取就行了。
下面就是一个简单的例子:
new_xml.asp文件
dim i
i = 0
sql="Select top 5 * from news "
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
%>
>
>
i=i+1
rs.movenext
loop
rs.close
set rs=nothing
%>
使用简单的ASP程序动态生成一个XML文件,其中把需要的数据读取出来。
Index.html文件:
function getnews(){
var xmldoc = new ActiveXObject("Microsoft.XMLDOM");
xmldoc.async = false;
if(!xmldoc.load("news_asp.asp")){
alert("读取数据失败!");
} else {
var xmlroot = xmldoc.documentElement.childNodes;
var showStr = '
var j;
var node = xmlroot.length;
var nodes;
while(j != node){
showStr += '
';for(j=0;j
nodes = xmlroot.nextNode();
showStr += '
';showStr += nodes.selectSingleNode("id").text;
showStr += '
';showStr += nodes.selectSingleNode("title").text;
showStr += '
';}
showStr += '
';}
showStr += '
';document.getElementById("showXml").innerHTML = showStr;
}
}
当单击button时,调用JavaScript中的getnews()方法,把内容添到
附:conn.asp链接数据库文件
dim conn,connstr,time1,time2,mdb
time1=timer
mdb="mdb/data.mdb" 'Access数据库的路径
on error resume next
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
%>