www.gusucode.com > 枫的记忆个人主页程序源码程序 > downcode.com\fengdejiyizh\admin\change_music.asp
<link href="admin.css" rel="stylesheet" type="text/css"> <% if session("level")<>"1" then Response.Write("你无权访问此页面!") Response.End end if %> <!--#INCLUDE FILE="conn.asp"--> <% hidden=trim(request("hidden")) id=trim(request("id")) if hidden="ok" then m_type=trim(request("m_type")) title=trim(request("title")) m_url=trim(request("m_url")) m_pic=trim(request("m_pic")) content=request("content") status=trim(request("status")) set rs=server.createobject("adodb.recordset") sql="select * from music where id="&id rs.Open sql,conn,1,3 rs("m_type")=m_type rs("title")=title rs("m_url")=m_url rs("m_pic")=m_pic rs("content")=content rs("status")=status rs.update if err.number<>0 then Response.Write("<script language=javascript>alert('修改失败,请点击返回');history.back();</script>") Response.End else Response.Redirect "manage_music.asp" Response.End end if end if set rs1=server.createobject("adodb.recordset") sql="select * from music where id="&id rs1.Open sql,conn,1,3 %> <body bgcolor="#CDD5DE"> <br><br> <table width="75%" border="0" cellspacing="1" cellpadding="0" align="center" class="tablebody"> <tr> <td><table width="100%" border="0" cellpadding="5" cellspacing="0"> <tr> <th>音 乐 修 改</a></span></th> </tr> </table></td> </tr> <tr> <td bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="1" cellpadding="8"> <form name="add_music" method="post" action="change_music.asp"> <input type="hidden" name="hidden" value="ok"> <input type="hidden" name="id" value="<%=id%>"> <tr bgcolor="#F3F5F8"> <td width="30%" align="right">类 型:</td> <td width="70%"><select name="m_type"> <option value="<%=rs1("m_type")%>"><%=rs1("m_type")%></option> <option value="MUSIC">MUSIC</option> <option value="FLASH">FLASH</option> <option value="M T V">M T V</option> <option value="MOIVE">MOIVE</option> </td> </tr> <tr bgcolor="#F3F5F8"> <td width="30%" align="right">是 否 显 示:</td> <td width="70%"><input name="status" type="text" id="status" size="4" value="<%=rs1("status")%>"> (<font color=red>0</font> 为显示,<font color=red>1</font> 为隐藏)</td> </tr> <tr bgcolor="#F3F5F8"> <td width="30%" align="right">名 称:</td> <td width="70%"><input name="title" type="text" id="title" size="50" value="<%=rs1("title")%>"></td> </tr> <tr bgcolor="#F3F5F8"> <td width="30%" align="right">地 址:</td> <td width="70%"><input name="m_url" type="text" id="m_url" size="50" value="<%=rs1("m_url")%>"></td> </tr> <tr bgcolor="#F3F5F8"> <td align="right">小 图 地 址:</td> <td><input name="m_pic" type="text" id="m_pic" size="40" value="<%=rs1("m_pic")%>"> <input type="button" name="Submit2" value="上 传" onClick="window.open('upload_flash.asp?formname=add_music&editname=m_pic&uppath=upfile&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')"> (首页显示图)</td> </tr> <tr bgcolor="#F3F5F8"> <td align="right">简 要 说 明:</td> <td><textarea name="content" cols="60" rows="10"><%=rs1("content")%></textarea></td> </tr> <tr bgcolor="#F3F5F8"> <td height="40" colspan="2" align="center"><input type="submit" name="Submit" value="修 改"> <input type="reset" name="Submit2" value="重 置"></td> </tr> </form> </table></td> </table> </body> </html>