⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mysxzy_xg.asp

📁 仿雅虎论坛静态生成html版 后台管理:admin/admin.asp 用户名:admin 密码:admin TOP/top.htm 顶部模板 left.htm 左边树形菜单模板
💻 ASP
字号:
<!--#include file="../conn.asp"-->
<html>
<head>
<title>受限资源修改</title>
<link rel="stylesheet" type="text/css" href="../css/style1.css">
</head>
<body>
<%
login=Request.Cookies("login")
username=Request.Cookies("username")
if login="Y" then
    xg=cint(Request.QueryString("xg"))
    xgup=cint(Request.QueryString("xgup"))
    if xg>0 then
      sql="SELECT top 1 * FROM DownFile where id="&xg&" "
      Set rs = Server.CreateObject("ADODB.Recordset")
      rs.open sql,conn,1,3
      if not(rs.BOF and rs.EOF) then
         if xgup>0 then
           rs("name")=Request.Form("name")
           rs("type")=Request.Form("type")
           rs("size")=Request.Form("size")
           rs("yypt")=Request.Form("yypt")
           rs("playdress")=Request.Form("playdress")
           rs("downdress")=Request.Form("downdress")
           rs("tj")=Request.Form("tj")
           rs("tjnum")=Request.Form("tjnum")
           rs.Update 
           Response.Write "修改完成"
         else
           %>
           <form name="mysxsyxg" method="post" action=mysxzy_xg.asp?xgup=1&xg=<%=cstr(xg)%>>
           <table>
           <tr><td colspan=2 class=light1>不需要修改的内容不要改动</td></tr>
           <tr><td class=light>资源名称</td><td><input type=text name=name size=50 value=<%=rs("Name")%>></td></tr>
           <tr><td class=light>类型</td><td><input type=text name=type size=10 value=<%=rs("type")%>></td></tr>
           <tr><td class=light>大小</td><td><input type=text name=size size=10 value=<%=rs("size")%>></td></tr>
           <tr><td class=light>运行平台</td><td><select name="yypt" size="1"><option selected value=<%=rs("yypt")%>><%=rs("yypt")%></option><option value="RealPlay">RealPlay</option><option value="MediaPlay">MediaPlay</option><option value="QuickTime">QuickTime</option></select></td></tr>
           <tr><td class=light>播放地址</td><td><input type=text name=playdress size=50 value=<%=rs("playdress")%>></td></tr>
           <tr><td class=light>下载地址</td><td><input type=text name=downdress size=50 value=<%=rs("downdress")%>></td></tr>
           <tr><td class=light>受限方式</td><td>
               <select name="select" size="1">
               <option selected value=<%=rs("tj")%>><%=rs("tj")%></option>
               <option value="没有任何条件">没有任何条件</option>
               <option value="支付金钱">支付金钱</option>
               <option value="声望限止">声望限止</option>
               <option value="积分限止">积分限止</option>
               <option value="经验限止">经验限止</option>
               <option value="帖子数限止">帖子数限止</option>
               </select>
           </td></tr>
           <tr><td class=light>受限数值</td><td><input type=text name=tjnum size=5 value=<%=rs("tjnum")%>></td></tr>
           <tr><td colspan=2 align=center><input type=Submit value="确定" name=add>&nbsp; <input type="reset" name="Clear" value="重写"></td></tr>
           </table>
           </form>
           <%
         end if
      else
         Response.Write "<br><br><br>参数有误!!!<br><br><br><br>"
      end if
    else
        Response.Write "<br><br><br>参数有误!!!<br><br><br><br>"
    end if
    rs.Close 
    set rs=nothing
    set conn=nothing
else
    Response.Write "<br><br><br>你登未登陆<br><br><br><br>"
end if
%>
</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -