openfile.asp

代码名称： 程式下载管理 添加日期： 2000-8-23 所属分类： ASP代码>主页管理 总下载次数： 697 文件大小： 20KB 适用环境： Unix/WINNT 评定级别：

<%@ LANGUAGE="VBSCRIPT" %>
<% option explicit %>
<!--#include file="dbconn.asp"-->
<%
dim sql
dim rs
set rs=server.createobject("adodb.recordset")
sql="update download set hits=hits+1 where ID="&request("ID")
rs.open sql,conn,1,1   
rs.close
conn.close
response.redirect request("filename")
%>