www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > english/dl.asp
<!--#include file="../opendb.asp" --> <% Call DisableOutSite() dim id id=Request.QueryString("id") Call IsNum(id) conn.execute("update cnk_download set dlnum=dlnum+1 where id="&id) rs.open "select filename from cnk_download where id="&id,conn,1,3 if rs("filename")="" or isnull(rs("filename")) then Response.Write("No file to download <br /> <a href=javascript:history.go(-1)>BACK</a>") else if instr(rs("filename"),"http://")>0 then Response.Redirect(rs("filename")) else Response.Redirect("../download/"&rs("filename")) end if end if %>