一个AJAX局部刷新的例子

最新推荐文章于 2021-08-05 13:44:02 发布

最新推荐文章于 2021-08-05 13:44:02 发布 · 360 阅读

文章标签：

#Ajax #ASP #VBScript #SQL Server #SQL

本文提供了一个使用VBScript实现的AJAX局部刷新示例。通过定时请求后台ASP页面获取数据并更新前台显示内容，展示了基本的AJAX交互原理。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

终于睛天了.

一个AJAX局部刷新的例子:

前台页面:

<%@LANGUAGE="VBSCRIPT"CODEPAGE="65001"%>
<!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<htmlxmlns="http://www.w3.org/1999/xhtml">
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=utf-8"/>
<title>AJAX局部刷新</title>
<scripttype="text/javascript">

</script>
</head>

<body>
<divid="partdiv"></div>
</body>
</html>

后台页面:[getPart.asp]

<%@LANGUAGE="VBSCRIPT"CODEPAGE="65001"%>

<%
dimrs
dimsql

Setrs=Server.CreateObject("ADODB.Recordset")
sql="select*fromking_test"
rs.opensql,conn,1,1
ifnot(rs.bofandrs.eof)then
Response.Write("<table>")
Response.Write(escape("<tr><td>ID</td><td>关键字</td></tr>"))
dowhilenotrs.eof
%>
<tr><td><%Response.Write(rs("id"))%></td><td><%Response.Write(escape(rs("keyword")))%></td></tr>
<%
rs.movenext
loop
Response.Write("</table>")
endif
rs.close
setrs=nothing
conn.close
Setconn=nothing
%>