<!--#include file="const.asp"-->
<!--#include file="Top.Asp"-->
<link href="Images/Admin_Style.Css" rel="stylesheet" type="text/css">
<!--#include file="error.ini"-->
<%
founderr=false

id=request("id")
songwords=trim(request("songwords"))
set rs=server.createobject("adodb.recordset")
if id="" then
	errmsg=errmsg+"<br><li>请先选择歌曲！</li>"
	founderr=true
else
	sql="select * from MusicList where id="&id
	rs.open sql,conn,1,3
	if not rs.EOF then
		
		if trim(songwords)="" then
			rs("songwords")=null
		else
			rs("songwords")=htmlencode2(songwords)
		end if
		rs("AddWordsUser")="站长"
		rs("LockWords")=true
		rs("shenhe")=false
		rs.update
	else
	errmsg=errmsg+"<br><li>选择歌曲错误！</li>"
	founderr=true
	end if
	rs.close
end if
set rs=nothing
conn.close
set conn=nothing
if founderr=true then
	call error()
else
%>
<body topmargin="111" leftmargin="0">
<TABLE cellSpacing=0 cellPadding=0 width=100% align=center border=0>
  <TBODY>
    <TR>
      <TD height=50></TD>
    </TR>
  </TBODY>
</TABLE>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
    <tr class="title">
      <td width="100%" Class="title">
          <table border="0" cellpadding="0" cellspacing="0" width="100%">
            <tr>
              <td width="100%" class=tdbg height="80" align="center">
                <b><img src="Images/OK.gif" width="150" height="47"></b>
                <p><a href="Admin_Word.Asp"><b>返 回</b> </a>
              </td>
            </tr>
          </table>
      </td>
    </tr>
  </table>
</body>                    
</html>           
<html></html>
<%
end if
%>