一个漂亮的点击计数器
2018-09-06 11:00
阅读：574
<%@ Language=VBScript %>
<%
Conn.Provider = Microsoft.Jet.OLEDB.4.0
Conn.ConnectionString = Data Source= Server.MapPath (db1.mdb)
Conn.Open
Set Rs = Server.CreateObject(ADODB.Recordset)
Rs.Open SELECT * from table1, Conn, 1,3
Rs.addnew
rs.movelast
Rs(hits) =hits
Rs.update
%>
<%=RS( counter )%>
<%
set Rs = nothing
set Conn = nothing
%>
下一篇：asp错误的几种处理方式
评论
亲，登录后才可以留言！