📄 admin_flash_add.asp
字号:
<!--#include file="Admin_Session.asp"-->
<!--#include file="Admin_Conn.asp"-->
<html>
<head>
<title>添加动画</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../Inc/Css.css" type="text/css">
</head>
<body marginheight="0" marginwidth="0" rightmargin="0" topmargin="0" leftmargin="0" bgcolor="#F1F1F1">
<!--#include file="Admin_Menu.asp"-->
<table class="table" border="0" width="70%" cellspacing="1" cellpadding="5" align="center" bgcolor="#2566AD">
<tr>
<td bgcolor="#BED7F1" colspan="2"><b>※ 添加动画</b></td>
</tr>
<form action="Admin_Flash_Add_Save.asp" method="post" name="AddNew" enctype="multipart/form-data">
<tr>
<td bgcolor="#FFFFFF" width="20%" align="right">文件名称：</td>
<td bgcolor="#FFFFFF" width="80%"><input type="text" name="Name" size="40"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">所属类别：</td>
<td bgcolor="#FFFFFF">
<%
dim count
sql="select * from Class order by ClassID asc"
set rs=conn.execute(sql)
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
if rs.eof or rs.bof then
else
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%=rs("ClassName")%>","<%=rs("ChannelID")%>","<%=rs("ClassID")%>");
<%
count = count + 1
rs.movenext
loop
rs.close
end if
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.AddNew.ClassID.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.AddNew.ClassID.options[document.AddNew.ClassID.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<%sql="select * from Channel"
set rs=conn.execute(sql)
if rs.eof or rs.bof then
response.write "<select name=ChannelID style='color:red'>"
response.write "<option value='尚未添加栏目'>尚未添加栏目</option>"
response.write "</select>"
else%>
<select name="ChannelID" onChange="changelocation(document.AddNew.ChannelID.options[document.AddNew.ChannelID.selectedIndex].value)" size="1">
<option selected value="<%=rs("ChannelID")%>"><%=rs("ChannelName")%></option>
<%
dim selclass
selclass=rs("ChannelID")
rs.movenext
do while not rs.eof%>
<option value="<%=rs("ChannelID")%>"><%=rs("ChannelName")%></option>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</select>
<select name="ClassID">
<%
if selclass="" then
selclass=0
end if
sql="select * from Class where ClassID="&selclass
set rs=conn.execute(sql)
if rs.eof or rs.bof then
else%>
<option selected value="<%=rs("ClassID")%>"><%=rs("ClassName")%></option>
<%rs.movenext
do while not rs.eof%>
<option value="<%=rs("ClassID")%>"><%=rs("ClassName")%></option>
<%rs.movenext
loop
end if
rs.close
set rs = nothing
%>
</select>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">系列动画：</td>
<td bgcolor="#FFFFFF">
<select name="SpecialID">
<option selected value="0">选择影片所属系列</option>
<%
sqlm="select * from Special"
set rsm=server.createobject("ADODB.Recordset")
rsm.open sqlm,conn,1,1
for iii=1 to rsm.recordcount
%>
<option value="<%=rsm("SpecialID")%>"><%=rsm("SpecialName")%></option>
<%
rsm.movenext
next
rsm.close
set rsm=nothing
%></select></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">动画作者：</td>
<td bgcolor="#FFFFFF"><input type="text" name="Flasher" size="16"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">文件大小：</td>
<td bgcolor="#FFFFFF"><input type="text" name="Size" size="10"> KB</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">动画评价：</td>
<td bgcolor="#FFFFFF"><select size="1" name="StarNO" style="color: #FF0000">
<option value="★★★★★" selected>★★★★★</option>
<option value="★★★★">★★★★</option>
<option value="★★★">★★★</option>
<option value="★★">★★</option>
<option value="★">★</option>
</select></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">文件地址：</td>
<td bgcolor="#FFFFFF"><input type="text" name="FileUrl" size="20" value="SwfFiles/"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">图片上传：</td>
<td bgcolor="#FFFFFF"><input name="Pic" type="file" size="35"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">作品简介：</td>
<td bgcolor="#FFFFFF"><textarea rows="5" name="Intro" cols="40"></textarea></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">歌手姓名：</td>
<td bgcolor="#FFFFFF"><input type="text" name="Singer" size="16"> <font color="red">如不是歌曲请留空</font></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right">是否推荐：</td>
<td bgcolor="#FFFFFF"><input name="IfTui" type="radio" value="1" checked>
是
<input type="radio" value="0" name="IfTui">
否</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="right"></td>
<td bgcolor="#FFFFFF"><input type="hidden" name="action" value="upload"><input border=0 onFocus=if(this.blur)this.blur() name=Submit src="Image/B_Add.gif" type=image></td>
</tr>
</form>
</table>
<!--#include file="CopyRight.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -