Paddsave.asp 1.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. <!--#include file="../bdcommx/connxyz.asp"-->
  2. <%
  3. call log_chk()
  4. dim title,picpath,Bid,Sid,Bname,Sname,d_content,note,tlink,odr,zhaiyao,canshu,cppz,jscs
  5. title=trim(request("title"))
  6. picpath=request("picpath")
  7. Bid=request("Bid")
  8. Sid=request("Sid")
  9. Bname=request("Bname")
  10. Sname=request("Sname")
  11. tlink=request("tlink")
  12. zhaiyao=request("zhaiyao")
  13. canshu=request("canshu")
  14. jscs=request("note")
  15. cppz=request("cppz")
  16. tj=request("tj")
  17. odr=request("odr")
  18. d_content=request("d_content")
  19. if title="" then
  20. call backurl("标题不能为空!")
  21. else
  22. Set rs=Server.Createobject("Adodb.Recordset")
  23. sql="select * from bdcp order by cxp_id desc"
  24. rs.open sql,conn,1,3
  25. rs.addnew
  26. rs("cxp_name")=title
  27. rs("Fileurl")=picpath
  28. rs("cb_id")=Bid
  29. if Sid<>"" then
  30. rs("cs_id")=Sid
  31. end if
  32. if tj<>"" then
  33. rs("cxp_tj")=tj
  34. end if
  35. if odr<>"" then
  36. rs("cxp_order")=odr
  37. end if
  38. rs("cxp_cont")=d_content
  39. rs("cxp_zy")=request("zhaiyao")
  40. rs("cxp_cppz")=request("cppz")
  41. rs("cxp_note")=jscs
  42. rs("cxp_cs")=request("canshu")
  43. rs("cxp_link")=tlink
  44. rs("cxp_Author")=session("adminxxx")
  45. rs("cxp_time")=now()
  46. rs.update
  47. rs.close
  48. set rs=nothing
  49. call GoUrl("Padd.asp?Bid="&Bid&"&Sid="&Sid&"&Bname="&Bname&"&Sname="&Sname&"","添加成功")
  50. end if
  51. %>