首页 相关文章 ASP+Ajax实现无刷新评论简单例子

ASP+Ajax实现无刷新评论简单例子

!--#include file="command.asp" --
%
Dim CurPage
CurPage=cint(Request("page"))
If CurPage = empty or CurPage1 Then
CurPage = 1
End If
Response.ContentType="application/xml"
Response.Charset="gb2312"
Response.Expires=0
Response.Write("?xml version=""1.0"" encoding=""gb2312""?")
Dim rs,Sql '定义连接数据库对象
Set rs=Server.CreateObject("ADODB.Recordset")
Sql="SELECT * From rev Order by id Desc"
rs.Open Sql,Conn,1,3
IF rs.Eof And rs.Bof Then
Respon...[ 查看全文 ]

2016-02-19 标签:

ASP+Ajax实现无刷新评论简单例子的相关文章

手机页面
收藏网站 回到头部