www.gusucode.com > 要听音乐网完美修正版 1.0源码程序 > admin/Admin_add_special_2.asp
<!--#include file="../inc/const.asp"-->
<!--#include file="inc/char.asp"-->
<html>
<head>
<title><%=site_info(0)%>-后台管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" type=text/css rel=stylesheet>
<script src="../js/checkform.js"></script>
</head>
<body text=#000000 leftmargin=0 topmargin=0 marginheight="0" marginwidth="0" bgcolor="#E5E5E5">
<br>
<%
Action=Request.Form("Action")
If Not CheckAdmin(ScriptName) Then
strMsg="<Li>您没有管理本页面的权限。"
Call Msg()
End If
Select Case Action
Case "Save"
Call Save()
Case Else
Call Main()
End Select
DataClose()
Sub Main()
SClassID=Checkstr(Request.QueryString("SClassid"))
SClass=Checkstr(Request.QueryString("SClass"))
NClassID=Checkstr(Request.QueryString("NClassid"))
NClass=Checkstr(Request.QueryString("NClass"))
%>
<form name="myform" method="post" action="?">
<div align="center">
<center>
<table border="1" width="99%" cellspacing="0" cellpadding="0" class="TableLine" bordercolor="#A4CEE4" bordercolordark="#FFFFFF">
<tr>
<td width="100%" height="20" bgcolor="#96C5DE" align=center><font color="white"><b>添 加 专 辑</b></font></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" value="<%=site_info(0)%>" size="20">←<a href="javascript:" onClick="document.myform.Gongsi.value='不详'">不详</a></td>
</tr>
<tr>
<td width="15%" height="25" align="right">发行日期：</td>
<td width="85%"><input type="text" name="Times" value="<%=Now()%>" size="20"></td>
</tr>
<tr>
<td width="15%" height="25" align="right">专辑图片：</td>
<td width="85%"><input type="text" name="pic" size="20">『<a href="javascript:Upload('special')">上传文件</a>』</td>
</tr>
<tr>
<td width="15%" height="25" align="right">专辑简介：</td>
<td width="85%"><TEXTAREA name="intro" rows=10 cols="60"></TEXTAREA></td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="100%" height="22" bgcolor="A4CEE4" align=center>
<input name="SClassID" type="hidden" id="SClassID" value="<%=SClassID%>">
<input name="SClass" type="hidden" id="SClass" value="<%=SClass%>">
<input name="NClassID" type="hidden" id="NClassID" value="<%=NClassID%>">
<input name="NClass" type="hidden" id="NClass" value="<%=NClass%>">
<input name="Action" type="hidden" id="Action" value="Save">
<input type="submit" name="Submit" value="提交" class=button>
<input type="reset" name="Submit2" value="重置" class=button></td>
</tr>
</form>
</table>
</center>
</div>
</form>
<%
End Sub
Sub Save()
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * FROM "& Tablespecials &""
Rs.Open Sql,Conn,1,3
Rs.Addnew
Rs("ClassID")=1
Rs("SClassID")=Request.Form("SClassID")
Rs("SClass")=Request.Form("SClass")
Rs("NClassID")=Request.Form("NClassID")
Rs("NClass")=Request.Form("NClass")
Rs("name")=Checkstr(Request.Form("name"))
Rs("Yuyan")=Checkstr(Request.Form("Yuyan"))
If Checkstr(Request.Form("Gongsi"))="" Then
Rs("Gongsi")="未知"
Else
Rs("Gongsi")=Checkstr(Request.Form("Gongsi"))
End If
If Checkstr(Request.Form("pic"))="" Then
Rs("pic")="specials/nophoto.gif"
Else
Rs("pic")=Checkstr(Request.Form("pic"))
End If
Rs("intro")=Checkstr(Request.Form("intro"))
If Checkstr(Request.Form("Times"))="" Then
Rs("Times")="未知"
Else
Rs("Times")=Checkstr(Request.Form("Times"))
End If
Rs.Update
Rs.Close
Set Rs=Nothing
Response.Redirect Url
End Sub
%>
</body>
</html>