www.gusucode.com > 盘锦DJ舞曲网 商业版源码程序 > admin/upclass.asp

    <!--#include file="../conn.asp"-->
<style type="text/css">
<!--
body{
	font-size: 12px;
	background-color:#E7E7E7;
	color:#0075D5;
}
-->
</style>
<%
if request("action")="editclass" then
classone=request("classone")
classtwo=request("classtwo")
response.write "<font color=#ff0000><b>正在进行数据合并...</b></font>"&"<br>"
set rs=server.createobject("adodb.recordset")
sql="select * from musiclist where classid="&classone&""
rs.open sql,conn,1,3
if rs.eof then
response.Write "<font color=#ff0000><b>没有需要合并的数据！</b></font>"
end if
i=0
do while not rs.eof
i=i+1
rs("classid")=classtwo
musicname=rs("musicname")
rs.update
response.Write "第"&i&"首歌曲　"&musicname&"　转移成功！"&"<br>"
response.flush
rs.movenext
loop
rs.close
set rs=nothing
response.write "<script>alert('OK！任务已成功执行！');location='music_list.asp';</script>"
end if

if request("action")="deleall" then
conn.execute("delete * from musiclist")
response.write "<script>alert('OK！数据库已成功清空！');location='music_list.asp';</script>"
end if
%>