📄 addfile3.asp
字号:
<%PageName="Addfile"%>
<!--#include file="function.asp"-->
<%CheckAdmin1%>
<%
Classid=cstr(trim(request.QueryString("classid")))
SClassid=cstr(trim(request.QueryString("sclassid")))
NClassid=cstr(trim(request.QueryString("Nclassid")))
%>
<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<script>
function submitonce(theform){
//if IE 4+ or NS 6+
if (document.all||document.getElementById){
//screen thru every element in the form, and hunt down "submit" and "reset"
for (i=0;i<theform.length;i++){
var tempobj=theform.elements[i]
if(tempobj.type.toLowerCase()=="submit"||tempobj.type.toLowerCase()=="reset")
//disable em
tempobj.disabled=true
}
}
}
</script>
<div align="center">
<center>
<table border="1" width="99%" cellspacing="0" cellpadding="0" class="TableLine" bordercolorlight="#CC0066">
<tr>
<td width="100%" height="20" bgcolor="#CC0066" align=center><font color="white"><b>添 加 专 辑</b></font></td>
</tr>
<tr>
<td width="100%" height="22" bgcolor="#FFAAD5" align=center>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<form method="POST" action="AddfileSave2.asp" id=form2 name=form2 onsubmit="submitonce(this);">
<tr>
<td width="15%" align="right">类型:</td>
<td width="85%"> 一级栏目:
<select name="classid" size="1" onchange="window.open('Addfile3.asp?classid='+this.options[this.selectedIndex].value,'_self')">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from class"
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option<%if classid=cstr(rs("classid")) and classid<>"" then%> selected<%end if%> value="<%=Cstr(rs("classid"))%>"><%=rs("class")%></option>
<%
rs.MoveNext
Loop
rs.close
%> </select>
二级栏目:
<%if classid<>"" then%>
<select name="Sclassid" size="1" onchange="window.open('Addfile3.asp?classid=<%=request("classid")%>&sclassid='+this.options[this.selectedIndex].value,'_self')">
<option value="" <%if request("Sclassid")="" then%> selected<%end if%>>选择栏目</option>
<%
sql="select * from Sclass where classid="&classid
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option<%if Sclassid=cstr(rs("Sclassid")) and Sclassid<>"" then%> selected<%end if%> value="<%=CStr(rs("Sclassid"))%>" name=Sclassid><%=rs("Sclass")%></option>
<%
rs.MoveNext
Loop
rs.close
else
%>
<select name="Sclassid" size="1">
<option value="" selected>选择栏目</option>
<%end if%>
</select>
三级栏目:
<%if sclassid<>"" then%>
<select name="Nclassid" size="1" onchange="window.open('Addfile3.asp?classid=<%=classid%>&sclassid=<%=sclassid%>&nclassid='+this.options[this.selectedIndex].value,'_self')">
<option value="" <%if Nclassid="" then%> selected<%end if%>>选择栏目</option>
<%
sql="select * from Nclass where Sclassid="&Sclassid
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option<%if cstr(request("Nclassid"))=cstr(rs("Nclassid")) and Nclassid<>"" then%> selected<%end if%> value="<%=CStr(rs("Nclassid"))%>" name=Nclassid><%=rs("Nclass")%></option>
<%
rs.MoveNext
Loop
rs.close
%>
<%else%>
<select name="Nclassid" size="1">
<option value="" selected>选择栏目</option>
<%end if%>
</select></td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="100%" height="25" align=left>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="15%" height="25" align="right">专辑名称:</td>
<td width="85%"><input type="text" name="name" size="20"></td>
</tr>
<tr>
<td width="15%" height="25" align="right">所属语言:</td>
<td width="85%"><select name="Yuyan" size="1">
<option value="国语" selected>国语</option>
<option value="粤语">粤语</option>
<option value="英文">英文</option>
<option value="日韩">日韩</option>
<option value="韩文">韩文</option>
<option value="日语">日语</option>
<option value="国/粤语">国/粤语</option>
<option value="中/英文">中/英文</option>
<option value="中/日文">中/日文</option>
<option value="中/韩文">中/韩文</option>
</select></td>
</tr>
<tr>
<td width="15%" height="25" align="right">唱片公司:</td>
<td width="85%"><input type="text" name="Gongsi" size="20"></td>
</tr>
<tr>
<td width="15%" height="25" align="right">发行日期:</td>
<td width="85%"><input type="text" name="Times" size="20"></td>
</tr>
<tr>
<td width="15%" height="25" align="right">专辑图片:</td>
<td width="85%"><input type="text" name="pic" size="20"><iframe src="../photo/up/upload.htm" scrolling="no" topmargin="0" width="260" height="20" marginwidth="0" marginheight="0" frameborder="0" align="center"></iframe></td>
</tr>
<tr>
<td width="15%" height="25" align="right">专辑简介:</td>
<td width="85%"><TEXTAREA name="intro" rows=5 cols="60"></TEXTAREA></td>
</tr>
<tr>
<td width="15%" align="right"></td>
<td width="85%"></td>
</tr>
<tr>
<td width="15%" align="right"></td>
<td width="85%"></td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="100%" height="22" bgcolor="#FFAAD5" align=center>
<input type="hidden" value="add" name="act">
<%if Classid="" then%>
<input type="button" value=" 确 定 " name="cmdok" onclick="window.alert('请先选择栏目!')">
<%elseif NClassid="" then%>
<input type="button" value=" 确 定 " name="cmdok" onclick="window.alert('请先选择子栏目!')">
<%else%>
<input type="submit" value=" 确 定 " name="cmdok">
<%end if%>
<input type="reset" value=" 取 消 " name="cmdcancel"></td>
</tr>
</form>
</table>
</center>
</div>
<%
set rs=nothing
conn.close
set conn=nothing
%></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -