开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 家庭/个人应用 > 查看源码
editnewpic.asp
资源名称：qnmov30.rar　[点击查看]
上传用户：qyswxdl
上传日期：2013-06-01
资源大小：1373k
文件大小：2k
源码类别：

家庭/个人应用

开发平台：

ASP/ASPX

editnewpic.asp：源码内容
  1. <!--#include file="../checkpost.asp"-->
  2. <!--#include file="../MD5/md5.asp" -->
  3. <!--#include file="security.asp"-->
  4. <!--#include file="articleconn.asp"-->
  5. <%if session("flag")>1 then
  6.     response.write "<script>alert('您的操作权限不够！');history.back();</script>"
  7.     response.end
  8. end if
  9. %>
  10. <%
  11. my=request("my")
  12. change=request("change")
  13. delet=request("delet")
  14. addname=request("addname")
  15. cmdok=request("cmdok")
  16. set rs=server.createobject("adodb.recordset")
  17. if my<>"" then
  18. name=Replace(request("name"), "'", "''")
  19. pwd=Replace(request("pwd"), "'", "''")
  20. sql="select * from password where id=1"
  21. rs.open sql,conn,1,3
  23. rs("name")=name
  24. rs("pwd")=md5(pwd)
  25. rs.update
  26. rs.close
  27. end if
  29. if change<>"" then
  30. typena=request("typename")
  31. sql="select * from type where typeid="&Replace(request("typeid"), "'", "''")
  32. rs.open sql,conn,1,3
  34. rs("type")=typena
  35. rs.update
  36. rs.close
  37. end if
  39. if request("changemovie")<>"" then
  40. sql="select * from movie where id="&clng(request("id"))
  41. rs.open sql,conn,1,3
  42. rs("movie")=trim(request("moviev"))
  43. rs("ipsip")=trim(request("ipsipb"))
  44. rs.update
  45. rs.close
  46. end if
  48. if request("addmovieip")<>"" then
  49. sql="select * from movie"
  50. rs.open sql,conn,1,3
  51. rs.addnew
  52. rs("movie")=Replace(request("moviet"), "'", "''")
  53. rs("ipsip")=Replace(request("ipsipt"), "'", "''")
  54. rs.update
  55. rs.close
  56. end if
  58. if delet<>"" then
  59.    conn.execute"delete from type where typeid="&Replace(request("typeid"), "'", "''")
  60. end if
  62. if request("deletserver")<>"" then
  63.    conn.execute"delete from movie where id="&clng(request("id"))
  64. end if
  66. if addname<>"" then
  67. typer=request("type")
  68. rs.open "select * from type",conn,1,3
  70. rs.addnew
  71. rs("type")=typer
  72. rs.update
  73. rs.close
  74. end if
  76. if cmdok<>"" then
  77.    pic1=request("pic1")
  78.    pic2=request("pic2")
  79.    pic3=request("pic3")
  80.    movie1=request("movie1")
  81.    movie2=request("movie2")
  82.    movie3=request("movie3")
  83.    rs.open "select * from newpic",conn,1,3
  84.    
  85.    rs("pic1")=pic1
  86.    rs("pic2")=pic2
  87.    rs("pic3")=pic3
  88.    rs("movie1")=movie1
  89.    rs("movie2")=movie2
  90.    rs("movie3")=movie3
  91.    rs.update
  92.    rs.close
  93. end if
  95.    set rs=nothing
  96.    conn.close
  97.    set conn=nothing
  98. response.redirect Request.ServerVariables("HTTP_REFERER")
  99. %>
  103. </body>
  104. </html>