<%@ ENABLESESSIONSTATE = FALSE %> <% dim classid,classname,typeid,typename if IsNumeric(Request.QueryString("id"))=False then Response.Redirect"info.asp?info=錯誤的參數" else id=cint(Request.QueryString("id")) end if set temprs=conn.execute("select typeid,classid,name from desktop where id="&id) typeid=temprs(0) classid=temprs(1) filename=temprs(2) set temprs=nothing set temprs=conn.execute("select name from class where id="&classid) classname=temprs(0) set temprs=nothing set temprs=conn.execute("select name from type where id="&typeid) typename=temprs(0) set temprs=nothing %> 国产一级a毛一级a看免费视频,久久久久久国产一级AV片,免费一级做a爰片久久毛片潮,国产精品女人精品久久久天天,99久久久无码国产精品免费了 蜜臀av一区二区_99久久99久久免费精品蜜桃_欧美喷潮久久久XXXXX_人妻少妇精品视频三区二区一区 " text="#000000" background="images/bg4.gif">
 
<% sql = "SELECT * FROM desktop where id="&id Set rs = Server.CreateObject("ADODB.Recordset") rs.OPEN sql,Conn,1,3 rs("ck")=rs("ck")+1 rs.update if rs("lx")=1 then Response.Write"
" elseif rs("lx")=0 then Response.Write"
" end if Response.Write"" if rs("url")<>"" then Response.Write"
文件名稱:"&rs("name")&" | 文件大小:"&rs("dx")&" | 察看次數:"&rS("ck")&" | 添加時間:"&rs("time")&"
文件簡介:"&rs("jj")&"
打 包
下 載
" end if Response.Write"
" rs.close Set rs=Nothing conn.close Set conn=Nothing %>
 
關閉窗口
主站蜘蛛池模板: 应用必备| 天全县| 上饶县| 宝山区| 江永县| 唐海县| 卢湾区| 垣曲县| 九江市| 金溪县| 枣庄市| 临洮县| 绥德县| 信丰县| 安龙县| 泰和县| 逊克县| 泸溪县| 新泰市| 桃江县| 嘉荫县| 治多县| 当阳市| 梅河口市| 衡阳市| 进贤县| 巧家县| 马关县| 澄迈县| 泌阳县| 嵩明县| 阜康市| 米脂县| 淅川县| 遵义县| 监利县| 台山市| 芜湖市| 临漳县| 兴仁县| 赤水市|