<!--#include file="function.Asp"-->
<!--#include file="Conn.Asp"-->
<%CheckAdmin3%>
<!--#include file="Top.Asp"-->
<%
'===========================版权信息===============================
' 888网音乐系统 V8.1 版
' 管方网址：www.888wang.com
' 技术支持: QQ:56566918
' 客服：见www.888wang.com网站的客服QQ
' 电话:15918529718
'==================================================================
%>
<%
cmdok=request("cmdok")
set rs=server.createobject("adodb.recordset")

if cmdok<>"" then
   pic1=request("pic1")
   pic2=request("pic2")
   pic3=request("pic3")
   pic4=request("pic4")
   movie1=request("movie1")
   movie2=request("movie2")
   movie3=request("movie3")
   movie4=request("movie4")
   
   message1=request("message1")
   message2=request("message2")
   message3=request("message3")
    message4=request("message4")
   
   messageUrl1=request("messageUrl1")
   messageUrl2=request("messageUrl2")
   messageUrl3=request("messageUrl3")
    messageUrl4=request("messageUrl4")
   
   rs.open "select * from newpic",conn,1,3
   
   rs("pic1")=pic1
   rs("pic2")=pic2
   rs("pic3")=pic3
   rs("pic4")=pic4
   rs("movie1")=movie1
   rs("movie2")=movie2
   rs("movie3")=movie3
   rs("movie4")=movie4
   
   rs("message1")=message1
   rs("message2")=message2
   rs("message3")=message3
    rs("message4")=message4
   rs("messageUrl1")=messageUrl1
   rs("messageUrl2")=messageUrl2
   rs("messageUrl3")=messageUrl3
   rs("messageUrl4")=messageUrl4
   rs.update
   rs.close
end if

   set rs=nothing
   conn.close
   set conn=nothing
Response.Write("<script>alert(""显页轮显图片修改成功"");location.href=""888wang_newpic.asp"";</script>")
	Response.End
%>



</body>
</html>






