videoedit.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 57 行

<!--#include file="admin.asp"-->
<!--#include file="conn1.asp"-->
<!-- #include file="../Inc/Head.asp" -->
<%
   VideoId=request("VideoId")
   set rs=server.createobject("adodb.recordset")
   Sql="select * from Video where VideoId="&VideoId
   rs.open sql,conn,1,1
 
%>
<script Language="JavaScript">
function FormValidator(theForm) 
{ 
	
	if (theForm.VideoName.value == "") 
	{ 
		alert("视频标题必须填写"); 
		theForm.VideoName.focus(); 
		return (false); 
	} 


	return (true); 
} 
</script> 

      
<table border="0" width="60%" cellspacing="1" cellpadding="2" align="center" bgcolor="#ffffff">
  <form method="POST" action="Videosave.asp?action=edit&VideoId=<%=VideoId%>" onsubmit="return FormValidator(this)">
    <tr> 
      <td nowrap>视频标题：</td>
      <td> <input type="text" name="VideoName" size="20"  maxlength="50" value="<%=rs("VideoName")%>"> 
      </td>
    </tr>
    <tr> 
      <td >视频作者：</td>
      <td> <input type="text" name="Videoauthor" value="<%=rs("author")%>" size="10"> 
      </td>
    </tr>
    <tr> 
      <td colspan="2" ><div align="center">
          <script src=../Inc/eshopcode.js></script>
          <!--#include file=../Inc/Ubb.inc -->
        </div></td>
    </tr>
    <tr> 
      <td >文件路径：</td>
      <td> 
        <textarea name="content" cols="50" rows="4" id="content"><%=rs("src")%></textarea> </td>
    </tr>
    <tr > 
      <td colspan=2 align=center> <input type="submit" value=" 确 定 "> </td>
    </tr>
  </form>
</table> 
<!-- #include file="../Inc/Foot.asp" -->