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

📄 movieroute.asp

📁 零度白茶影视系统好东西要大家分享
💻 ASP
字号:
<%@language=vbscript codepage=936 %>
<!--#include file="../inc/conn.asp"-->
<!--#include file="AdminChkPurview.asp"-->
<script language="JavaScript"> 
function delete_confirm(e) { 
 if (event.srcElement.value=="删除") 
  event.returnValue=confirm("您确认执行删除操作么?"); 
 } 
 document.onclick=delete_confirm; 
</script> 
<html>
<head>
<title>电影修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="../inc/Admin_Style.css"></head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
    <table cellpadding="0" cellspacing="1" border="0" width="100%">
      <tr>
        <td height="22" align="center" class="title"><b>影 片 路 径 管 理</b></td>
      </tr>
      <tr class="tdbg">
        <td height="468" align="center"><table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="534" id="AutoNumber1" bgcolor="#FFFFFF" height="113">
          <tr>
            <td width="528" bgcolor="#F7F7F7" height="20"><p align="center">&nbsp;电影服务器列表</td>
          </tr>
          <tr>
            <%set rs=server.createobject("adodb.recordset")
    rs.open "select * from movie",conn,1,1
        dim i
    i=1
    do while not rs.eof
    %>
            <form method="POST" onsubmit action="Movieroute.asp?id=<%=rs("id")%>">
              <td width="528">第<%=i%>服务器:在线
                <input type="text" name="ipsipb" size="43" value="<%=rs("ipsip")%>">
                  <input type="submit" value="修改" name="changemovie" style="cursor: hand;background-color: #cccccc;">
                  <input type="submit" value="删除" name="deletserver" style="cursor: hand;background-color: #cccccc;"></td>
            </form>
          </tr>
          <% 
      i=i+1
      rs.movenext
      loop
      rs.close
      set rs=nothing
      %>
          <tr>
            <form method="POST" onsubmit action="Movieroute.asp">
              <td width="528">增服务器:在线
                  <input type="text" name="ipsipt" size="43">
              <input type="submit" value="新增" name="addmovieip" style="cursor: hand;background-color: #cccccc;"></td>
            </form>
          </tr>
  <td height="9"></form>
  
  <tr>
    <td width="528" align="center">例如:rstp://www.zerotea.cn/</td>
  </tr>
  <tr>
    <td width="528"> </td>
  </tr>
        </table></td>
      </tr>
      <tr class="tdbg">
        <td width="254" align="right">&nbsp;</td>
      </tr>
    </table>
 <!--#include file="AdminFooder.asp"-->
</body>

</html>
<%
if request("changemovie")<>"" and request("id")<>"" then
response.write "sdfsfsdf"
set rs=server.createobject("adodb.recordset")
sql="select * from movie where id="&request("id")
rs.open sql,conn,1,3
rs("ipsip")=trim(request("ipsipb"))
rs.update
rs.close
response.redirect Request.ServerVariables("HTTP_REFERER")
end if

if request("deletserver")<>"" and request("id")<>"" then
   conn.execute"delete from movie where id="&clng(request("id"))
response.redirect Request.ServerVariables("HTTP_REFERER")
end if

if request("addmovieip")<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from movie"
rs.open sql,conn,1,3
rs.addnew
rs("ipsip")=request("ipsipt")
rs.update
rs.close
response.redirect Request.ServerVariables("HTTP_REFERER")
end if
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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