当前位置: 首页 > 图文教程 > 网络编程 > ASP > 一个漂亮的点击计数器

ASP
在ASP中使用SQL语句之10:视图
在ASP中使用SQL语句之11:记录统计
VBS、ASP代码语法加亮显示的类(2)
asp作品保护方案
使用NextRecordset通过一个Connection输出多个select查询
超长字符的智能分页-支持HTML
远程获取内容,并将内容存在本地电脑上,包括任何文件
把文件存进access数据库然后取出来供人下载的代码
一个分页存储过程
在asp文件中访问flash详细信息
关于生成目录树结构的类
用自定义函数获取汉字的首字母
asp在SQL SER2k中新建帐号和给帐号权限的实现
不用 EOF 以加快记录循环
js的单元格颜色间隔
根据选择的Checkbox动态在表格中列出选择的值
URL欺骗
汉字转化为拼音
一个不需要第三方组件,可实现华简单图形的类
组合查询之核心:拼接字符串

ASP 中的 一个漂亮的点击计数器


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 138 ::
收藏到网摘: n/a

  <%@ Language=VBScript %>

<html>
<%

Set Conn = Server.CreateObject("ADODB.Connection")
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
%>
<body bgcolor="#FFFFFF">
<center>
   <table width=97 height="44">
    <tr>
      <td background="counter.jpg" height="32" align="center" valign="top"> <%=RS( "counter" )%>
      </td>
    </tr>
  </table>
</center>
<%
set Rs = nothing
set Conn = nothing
%>
</body>
</html>