moneysave.asp
上传用户:qyswxdl
上传日期:2013-06-01
资源大小:1373k
文件大小:1k
源码类别:

家庭/个人应用

开发平台:

ASP/ASPX

  1. <!--#include file="articleconn.asp"-->
  2. <!--#include file="security.asp"-->
  3. <%if session("flag")>1 then
  4.     response.write "<br><p align=center>您的操作权限不够!</p>"
  5.     response.end
  6. end if
  7. set rs=server.createobject("adodb.recordset")
  8. sql="select* from setmoney where id=1"
  9. rs.open sql,conn,1,3
  10. rs("pmoney")=Replace(request("pmoney"), "'", "''")
  11. rs("bmoney")=Replace(request("bmoney"), "'", "''")
  12. rs("hmoney")=Replace(request("hmoney"), "'", "''")
  13. rs("zmoney")=Replace(request("zmoney"), "'", "''")
  14. rs("p150")=Replace(request("p150"), "'", "''")
  15. rs("p200")=Replace(request("p200"), "'", "''")
  16. rs("p250")=Replace(request("p250"), "'", "''")
  17. rs("p350")=Replace(request("p350"), "'", "''")
  18. rs("p400")=Replace(request("p400"), "'", "''")
  19. rs("p500")=Replace(request("p500"), "'", "''")
  20. rs("p1000")=Replace(request("p1000"), "'", "''")
  21. rs("p1500")=Replace(request("p1500"), "'", "''")
  22. rs.update
  23. rs.close
  24. set rs=nothing
  25. conn.close
  26. set conn=nothing
  27. response.redirect"setmoney.asp"
  28. %>