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

📄 addfilm.asp

📁 顶级影视站ASP源代码系统。很全面很强大。数据库用access
💻 ASP
字号:
<!--#include file="primary_admin.asp"-->
<!--#include file="HMconnection.asp"-->
<html>
<head>
<title>顶级影视 设计维护:QQ:1243619 Email:yakai@163.net</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../style/style.css">
</head>
<body>
<form action="savefilm.asp" method="POST" name="form1" target="_self">
  <table width="80%" border="1" cellspacing="0" cellpadding="1" bordercolor="#CCCCCC" align="center">
  <tr> 
    <td> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="9" background="../images/back_3.gif" rowspan="2"></td>
          <td class="12v"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
              <tr> 
                <td class="12v" > 
                  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
                    <tr> 
                      <td>
                        <table width="100%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#0099FF">
                          <tr> 
                            <td height="20"> 
                              <div align="center"><font color="#FFFFFF">顶级影视--后台管理系统>>>添加影片</font></div>
                            </td>
                          </tr>
                          <tr> 
                            <td height="213" valign="top" bgcolor="#E8F1FF"><br>
                              <table width="90%" border="0" align="center" cellpadding="1" cellspacing="1">
                                  <tr> 
                                    <td height="16"> ·片名:</td>
                                    <td height="16"><input type="text" name="title" size="45" maxlength="255"></td>
                                  </tr>
                                  <tr> 
                                    <td width="15%">·主演:</td>
                                    <td width="85%"><input type="text" name="dog" size="45" maxlength="255"></td>
                                  </tr>
                                  <tr> 
                                    <td>·导演:<br> </td>
                                    <td><input type="text" name="directors" size="45" maxlength="255"></td>
                                  </tr>
                                  <tr> 
                                    <td>·出品公司:</td>
                                    <td><input type="text" name="productor" size="45" maxlength="255"></td>
                                  </tr>
                                  <tr> 
                                    <td>·影片产地:</td>
                                    <td><input type="text" name="madein" size="45" maxlength="255" value="中国大陆"></td>
                                  </tr>
                                  <tr> 
                                    <td>·影片格式:</td>
                                    <td><input type="text" name="runsystem" size="3" maxlength="255" value="RM"> 
                                      &nbsp;&nbsp;·影片质量: <input type="text" name="quality" size="5" maxlength="255" value="450kps"> 
                                      &nbsp;&nbsp;·影片长度: <input type="text" name="filmtime" size="3" maxlength="255" value="90">分钟 
                                    </td>
                                  </tr>
                                  <tr> 
                                    <td>·影片来源:</td>
                                    <td><input type="text" name="madeBy" size="45" maxlength="255" value="DVD转录"></td>
                                  </tr>
                                  <tr> 
                                    <td>·影片类型:</td>
                                    <td><select name="FilmType" id="ImgeFile" size="1">
                                        <%dim filmTypeRS
									set filmTypeRS=server.CreateObject("adodb.recordset")
                                    filmTypeRS.Open "select * from type",conn,1,1
									do while not filmTypeRS.eof  
                                     response.Write("<option value='"&filmTypeRS("typeid")&"'>"&filmTypeRS("typeid")&"、["&filmTypeRS("type")&"]</option>")									 
									 filmTypeRS.movenext
									 loop
									 filmTypeRS.close
									 set filmTypeRS=nothing%>
                                      </select>
                                      &nbsp;&nbsp;·存放文件夹:<input type="text" name="filmFile" size="11" maxlength="255" value="zhongjzh2/"></td>
                                  </tr>
                                  <tr> 
                                    <td>·文件名称:</td>
                                    <td><input type="text" name="FilmName" size="19" maxlength="255" value="zhongjiezhe3">
									影片扩展名<input type="text" name="FilmExtent" size="15" maxlength="255" value=".rm"></td>
                                  </tr>
                                  <tr> 
                                    <td>·影片集数:</td>
                                    <td>开始集&nbsp; <input type="text" name="FilmStart" size="10" maxlength="255" value="1"> 
                                      &nbsp;&nbsp;总集数&nbsp; <input type="text" name="Filmcount" size="10" maxlength="255" value="2"> 
                                    </td>
                                  </tr>
                                  <tr> 
                                    <td>·站点地址:</td>
                                    <td><select name="webAddr" id="webAddr" size="1">
                                        <%dim webAddRS
									set webAddRS=server.CreateObject("adodb.recordset")
                                    webAddRS.Open "select * from WebAddr",conn,1,1
									do while not webAddRS.eof  
                                     response.Write("<option value='"&webAddRS("webaddrID")&"'>"&webAddRS("webaddrID")&"、["&webAddRS("WedAddr")&"]</option>")									 
									 webAddRS.movenext
									 loop
									 webAddRS.close
									 set webAddRS=nothing%>
                                      </select></td>
                                  </tr>
                                  <tr> 
                                    <td>·剧照目录:</td>
                                    <td><select name="imgefile" id="imgefile" size="1">
                                        <%dim imNameRS
									set imNameRS=server.CreateObject("adodb.recordset")
                                    imNameRS.Open "select * from imagefile",conn,1,1
									do while not imNameRS.eof  
                                     response.Write("<option value='"&imNameRS("PicFileID")&"'>"&imNameRS("PicFileID")&"、["&imNameRS("ImgeFile")&"]</option>")									 
									 imNameRS.movenext
									 loop
									 imNameRS.close
									 set imNameRS=nothing%>
                                      </select></td>
                                  </tr>
                                  <tr> 
                                    <td>·剧照名称:</td>
                                    <td><input type="text" name="imagesname" size="20" maxlength="255" value="abcd.jpg">
									&nbsp;&nbsp;·开放范围:<select name="grade" size="1">
									<option value="0">所有人</option>
									<option value="1" selected>普通用户</option>
									<option value="2">VIP用户</option>
									</select>
									</td>
                                  </tr>
                                  <tr> 
                                    <td>·观看费用:</td>
                                    <td><input type="text" name="filmprice" size="1" maxlength="255" value="1"> 
                                      &nbsp;&nbsp;·推荐程度: 
                                      <select name="filmlevel" size="1">
                                        <% dim i
									for i=0 to 10
									 response.Write("<option value='"&i&"'>"&i&"</option>")
									next
									%>
                                      </select> 
									 &nbsp;&nbsp; ·首页显示:YES 
                  <input type="radio" name="best" value=1 checked>
                  &nbsp;NO 
                  <input type="radio" name="best" value=0> 
									  </td>
                                  </tr>
                                  <tr> 
                                    <td>·上传剧照:</td>
                                    <td><input name="filmpic" type="text" id="filmpic" value="上传即可,不必填写!" size="35" readonly=""> 
                                      &nbsp;&nbsp; <input type="button" name="Submit2" value="上 传" onClick="javascript:window.open('upfile0.asp','','width=500,height=160,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"></td>
                                  </tr>
                                  <tr> 
                                    <td>·影片简介:</td>
                                    <td><textarea name="content" cols="60" rows="10"></textarea></td>
                                  </tr>
                                  <tr> 
                                    <td colspan="2" align="center"><input type="submit" value="提  交" name="cmdok" class="button"> 
                                      &nbsp;&nbsp; <input type="reset" value="重  置" name="cmdcancel" class="button"> 
                                    </td>
                                  </tr>
                                </table>
                              <br>
                              <table width="90%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#99FFFF">
                                <tr> 
                                  <td>
                                    <div align="center">提示说明</div>
                                  </td>
                                </tr>
                                <tr> 
                                    <td><font color="#FF0000">·1、影音文件的名称由"[文件名称]+[影片集数]+[影片扩展名]"构成;<br>
                                      ·2、[站点地址]是指放置影音文件的WEB地址;如果只有一集<br>
                                      ·3、 一般情况下,强烈推荐的影片才应用[首页显示];<br>
                                      ·4、如果影片只有一集,[影片集数]的[开始集]和[总集数]要为同一个数,如同为1或2…。。 
                                      </font></td>
                                </tr>
                              </table>
                              <br>
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
          <td class="12v" background="../images/back_3.gif" width="9" rowspan="2"></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</form>
<!--#include file="copyright.asp"-->
</body></html>

⌨️ 快捷键说明

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