一个AJAX局部刷新的例子

最新推荐文章于 2025-08-21 21:29:08 发布

转载最新推荐文章于 2025-08-21 21:29:08 发布 · 2k 阅读

文章标签：

#ajax #vbscript #xmlhttprequest #function #url #table

本文介绍了一种使用 ASP 和 AJAX 技术实现网页局部刷新的方法。通过每隔一段时间请求后台 ASP 页面获取数据，并利用 JavaScript 更新指定区域的内容，实现了数据的定时更新而无需刷新整个页面。此外，还解决了中文字符显示乱码的问题。

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

前台页面:

<%@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> <mce:scripttype="text/javascript"></mce: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 %>

asp ajax无刷新局部更新数据(解决中文乱码的问题)

页面中加入：

Response.ContentType = "text/html"
Response.Charset = "GB2312"