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

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

家庭/个人应用

开发平台：

ASP/ASPX

SAVEEDIT.ASP：源码内容
  1. <!--#include file="../checkpost.asp"-->
  2. <!--#include file="inc/articlechar.inc"-->
  3. <!--#include file="articleconn.asp"-->
  4. <!--#include file="security.asp"-->
  5. <%if session("flag")>2 then
  6.     response.write "<br><p align=center>您的操作权限不够！</p>"
  7.     response.end
  8. end if
  9. %>
  10. <%
  12. set rs=server.createobject("adodb.recordset")
  13. sql="select * from learning where articleid="&clng(request("id"))
  14. rs.open sql,conn,3,3
  15. rs("typeid")=Request.Form("typeid")
  16. rs("softlevel")=Request.Form("softlevel")
  17. rs("serverip")=request.form("serverip")
  18. rs("title")=request.form("titley")
  19. rs("name")=request.form("namef")
  20. rs("where")=request.form("where")
  21. rs("typeid")=request.form("typeid")
  22. rs("best")=request.form("best")
  23. rs("firstbest")=request.form("firstbest")
  24. rs("onlinelook")=request.form("onlinelook")
  25. rs("down")=request.form("down")
  26. rs("howlong")=request.form("howlong")
  27. rs("domurl")=request.form("domurl3")
  28. rs("movietype")=request.form("movietype")
  29. rs("canlook")=request("canlook")
  30. rs("count")=request("count")
  31. rs("dateandtime")=Date()
  32. rs("content")=replace(request.form("contentl"),vbcrlf,"<br>")
  33. rs.update
  34. rs.close
  36. dim t
  37. t=0
  38. set rs=server.createobject("adodb.recordset")
  39. sql1="select * from movieurl where nameid='"&clng(request("id"))&"'"
  40. rs.open sql1,conn,1,3
  41. do while not rs.eof
  42. t=t+1
  43. rs("url")=request.form("url"&t&"")
  44. rs.update
  45. rs.movenext
  46. loop
  48. rs.close
  49. set rs=nothing
  50. conn.close
  51. set conn=nothing
  53. response.redirect Request.ServerVariables("HTTP_REFERER")
  54. %>