gydown.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 27 行

<!--#include file="inc/conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
	sql="update download set downcount=downcount+1 where id="&request("id")
	rs.open sql,conn,1,3 
downs=trim(request("down"))
set rs1=server.createobject("adodb.recordset")
	sql1="select * from download where id="&request("id")
	rs1.open sql1,conn,1,3 
	if downs=1 then
    down=rs1("down1")
    end if
	if downs=2 then
    down=rs1("down2")
    end if
	if downs=3 then
    down=rs1("down3")
    end if
	if downs=4 then
    down=rs1("down4")
    end if
	if downs=5 then
    down=rs1("down5")
    end if
response.Redirect(down)
%>