<%@ 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 %> 国产精品免费av片在线观看-无码人妻精品一区二区三区不卡-久久亚洲国产精品五月天婷-国产精品岛国久久久久-国产三级精品三级男人的天堂 蜜臀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 %>
 
關閉窗口
主站蜘蛛池模板: 井陉县| 太湖县| 房产| 诸暨市| 古蔺县| 丰都县| 卓资县| 林西县| 安多县| 甘谷县| 遂平县| 宜州市| 隆德县| 房产| 都昌县| 大渡口区| 秀山| 交口县| 曲水县| 晋中市| 阳春市| 桐城市| 缙云县| 赣榆县| 阳曲县| 泸定县| 开远市| 北辰区| 徐水县| 张家港市| 安陆市| 纳雍县| 根河市| 白水县| 和田市| 铜川市| 新疆| 铁力市| 万盛区| 拜泉县| 靖州|