gourl.asp文件代码：
<%
dim id : id=trim(request.QueryString("id"))
if len(id)>0 then
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from [表名] where [id]=" & id
'conn为打开数据库变量
rs.open sql,conn,1,2
if rs.bof=false and rs.eof=false then
rs("下载次数")=rs("下载次数")+1
rs.update()
rs.close() : set rs=nothing
response.Redirect(rs("文件路径"))
response.End()
end if
end if
%>
京公网安备 11010802041100号