<%
act=cstr(trim(request("act")))
Classid=cstr(trim(request.QueryString("classid")))
SClassid=cstr(trim(request.QueryString("sclassid")))
NClassid=cstr(trim(request.QueryString("Nclassid")))
Specialid=cstr(trim(request.QueryString("Specialid")))
if act="add" then title="添 加 专 辑"
if act="edit" then title="编 辑 专 辑"
if act="" then title="添 加 歌 曲 快 捷 方 式"
%><!--#include file="inc.asp"-->
<!--#include file="check.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="images/Admin_Style.css">
<head>
<title>福建音乐视听网 管理中心</title>
<body leftmargin="2" topmargin="0" marginwidth="0" marginheight="0">
<%
dim i
set rs=server.createobject("adodb.recordset")
set rs2=server.createobject("adodb.recordset")

sql="select * from class order by classid"
rs.open sql,conn,1,1
i=request("id")
if i="" then i=rs("Classid")
%>
<%do while not rs.eof
%>
<%rs.movenext
loop
rs.close
%>
<%sql="select * from class where classid="&i
rs.open sql,conn,1,1
if rs.eof then%>
<%
else
%>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" style="border-collapse:collapse;">
<tr>
<td width="100%" height="22" align=center class="topbg"><strong>添 加 编 辑 专 辑</strong></td>
</tr><tr>
<td width="100%" height="22" class="tdbg" align=center>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" bordercolordark="#FFFFFF">
<tr>
<td width="140">&nbsp;<b>→选择分类(第一步)：</b></td>
<td height="22" align=center>
<%
sql2="select * from SClass where Classid="&rs("Classid")&" order by Sclassid"
rs2.open sql2,conn,1,1
if rs2.eof then
%>
<%
else
j=0
do while not rs2.eof
j=j+1
%>
&nbsp;&nbsp;<a href='0hao_Geshou.asp?Classid=<%=rs("Classid")%>&SClassid=<%=rs2("SClassid")%>'><%=rs2("SClass")%></a>
<%
rs2.movenext
loop
end if
rs2.close
%></td>

<%
end if
rs.close
%>
</tr>
</table>
</div>
</td>
</tr>
<tr><td height=10></td></tr></table>



<table width="100%" border="1" cellpadding="2" cellspacing="0" class="border" style="border-collapse:collapse;">
<form method="POST" action="0hao_special_Save.asp?Specialid=<%=Specialid%>">
<tr>
<td width="100%" height="22" colspan=2 align=center><b><%=title%></b></td>
</tr>
<tr>
<td align="right">类型：</td>
<td>一级栏目:
<select name="classid" size="1" onchange="window.open('0hao_special_Add.asp?act=<%=act%>&Specialid=<%=Specialid%>&classid='+this.options[this.selectedIndex].value,'_self')" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
<option value="" <%if request("classid")="" then%> selected<%end if%> style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
选择栏目</option>
<%
set rs=server.createobject("adodb.recordset")
if act="edit" then
sql="select * from class where classid="&classid
else
sql="select * from class"
end if
rs.open sql,conn,1,1
do while not rs.eof
%>
<option<%if cstr(request("classid"))=cstr(rs("classid")) and request("classid")<>"" then
classn=rs("class")
response.write " selected"
end if%> value="<%=CStr(rs("classID"))%>" name=classid><%=rs("class")%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
二级栏目:
<%if request("classid")<>"" then%>
<select name="sclassid" size="1" onchange="window.open('0hao_special_Add.asp?act=<%=act%>&Specialid=<%=Specialid%>&classid=<%=classid%>&sclassid='+this.options[this.selectedIndex].value,'_self')" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
<option value="" <%if request("sclassid")="" then%> selected<%end if%>>选择栏目</option>
<%
if act="edit" then
sql="select * from sclass where sclassid="&request("sclassid")
else
sql="select * from sclass where classid="&request("classid")
end if
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option<%if cstr(request("sclassid"))=cstr(rs("sclassid")) and request("sclassid")<>"" then
sclassn=rs("sclass")
response.write " 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 style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
选择栏目</option>
<%end if%>
</select>
三级栏目:
<%if request("Sclassid")<>"" then%>
<select name="Nclassid" size="1" onchange="window.open('0hao_special_Add.asp?act=<%=act%>&Specialid=<%=Specialid%>&classid=<%=classid%>&SClassid=<%=SClassid%>&nclassid='+this.options[this.selectedIndex].value,'_self')" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
<option value="" <%if request("Nclassid")="" then%> selected<%end if%>>选择栏目</option>
<%
'if act="edit" then
'sql="select * from Nclass where Nclassid="&Nclassid
'else
sql="select * from Nclass where Sclassid="&request("Sclassid")
'end if
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option<%if cstr(request("Nclassid"))=cstr(rs("Nclassid")) and request("Nclassid")<>"" then
nclassn=rs("Nclass")
response.write " 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 style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
选择栏目</option>
<%end if%>
</select> (<font color=red>*</font>)
</td>
</tr>






<%
if request("specialid")<>"" then
set rsmin=server.createobject("adodb.recordset")
sqlmin="select * from special where specialid="&request("specialid")
rsmin.open sqlmin,conn,1,1
name=rsmin("name")
yuyan=rsmin("yuyan")
gongsi=rsmin("gongsi")
times=rsmin("times")
info=rsmin("info")
pic=rsmin("pic")
hits=rsmin("hits")
isgood=rsmin("isgood")
rsmin.close
set rsmin=nothing
end if
%>
<tr>
<td align="right">专辑名称：</td>
<td><input type="text" name="Name" value="<%=name%>" size="20" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">  (<font color=red>*</font>)</td>
</tr>
<tr>
<td width="15%" align="right">所属语言：</td>
<td width="85%"><select name="yuyan" size="1">
<option style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;">
选择路径</option>
<%if yuyan<>"" then%>
<option value="<%=yuyan%>" selected></option><%end if%>
<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>
<option value="其它">其它</option>
</select></td>
</tr>
<tr>
<td width="15%" align="right">唱片公司：</td>
<td width="85%"><input type="text" name="gongsi" value="<%=gongsi%>" size="30" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;"></td>
</tr>
<tr>
<td width="15%" align="right">发行日期：</td>
<td width="85%"><input type="text" name="times" value="<%=times%>" size="30" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;"></td>
</tr>
<tr>
<td width="15%" align="right">专辑图片：</td>
<td width="85%"><input type="text" name="pic" value="<%=pic%>" size="30" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;"></td>
</tr>
<tr>
<td width="15%" align="right">浏 览 量：</td>
<td width="85%"><input type="text" name="hits" value="<%=hits%>" size="30" style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;"></td>
</tr>
<tr>
<td width="15%" align="right">专辑简介：</td>
<td width="85%"><TEXTAREA name="info" rows=12 cols="70"><%=info%></TEXTAREA></td>
</tr>
<tr>
<td align=right " width=" bgcolor="#F1F3F5">是否推荐：</td>
<td " width=" bgcolor="#F1F3F5"><%if isgood=true then%><input type="radio" name="isgood" value="1" checked>是<input name=isgood type="radio" value="0">否<%else%><input name=isgood value="1" type="radio">是<input name=isgood type="radio" value="0" checked>否<%end if%></td>
</tr>
<tr>
<td colspan=2 align=center>
<input type="hidden" value="<%if act<>"" then%><%=act%><%else%>add<%end if%>" name="act">
<input type="hidden" value="<%=classn%>" name="class">
<input type="hidden" value="<%=sclassn%>" name="sclass">
<input type="hidden" value="<%=nclassn%>" name="nclass">
<%if request("Classid")="" then%>
<input style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;" type="button" value=" &#30830; &#23450; " name="cmdok" onclick="window.alert('&#35831;&#20808;&#36873;&#25321;&#19968;&#32423;&#26639;&#30446;&#65281;')">&nbsp;
<%elseif request("SClassid")="" then%>
<input style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;" type="button" value=" &#30830; &#23450; " name="cmdok" onclick="window.alert('&#35831;&#20808;&#36873;&#25321;&#20108;&#32423;&#26639;&#30446;&#65281;')">&nbsp;
<%elseif request("NClassid")="" then%>
<input style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;" type="button" value=" &#30830; &#23450; " name="cmdok" onclick="window.alert('&#35831;&#20808;&#36873;&#25321;&#19977;&#32423;&#26639;&#30446;&#65281;')">&nbsp;
<%else%>
<input style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;" type="submit" value=" &#30830; &#23450; " name="cmdok">&nbsp;
<%end if%>
<input style="color:#000000; background-color:#E1F4EE; border-width:1px; border-color:#39867B; border-style:solid;" type="reset" value=" &#28165; &#38500; "  name="cmdcancel">
</td>
</tr>
</form>
</table>
<%
set rs=nothing
set rs2=nothing
conn.close
set conn=nothing
%>