bjhycl.asp
上传用户:sking1122
上传日期:2020-09-24
资源大小:1005k
文件大小:2k
源码类别:

手机WAP编程

开发平台:

ASP/ASPX

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><?xml version="1.0" encoding="utf-8"?>
  2. <%response.buffer=true%>
  3. <%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
  4. <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"> 
  5. <!--#include file="conn.inc"-->
  6. <!--#include file="cnscu_sb.asp"-->
  7. <wml>
  8. <head><%
  9. '====================================================================
  10. ' 请你保留这段说明,这并不会影响你的速度.   电脑交流:http://www.cnscu.cn
  11. ' 程序制作:横云   掌上校园收倾心整理收集于互联网,感谢你的支持!
  12. ' 升级时间: 2008-2-5   主页地址:HTTP://wap.cnscu.cn
  13. ' E-Mail: cnscu@126.com    客服QQ:554904632 QQ群:30493504 QQ群2:46659883
  14. '====================================================================
  15. %> <meta http-equiv='Cache-Control' content='no-cache'/>
  16. </head>
  17. <card title="编辑资料">
  18. <p>
  19. <%
  20. name=request("name")
  21. grjs=request("grjs")
  22. grxb=request("grxb")
  23. szcs=request("szcs")
  24. csrq=request("csrq")
  25. sjhm=request("sjhm")
  26. hymm=request("hymm")
  27. mmwt=request("mmwt")
  28. wtda=request("wtda")
  29. myjf=request("myjf")
  30. id=request("id")
  31. myjb=request("myjb")
  32. %>
  33. <%set rspx=Server.CreateObject("ADODB.Recordset")
  34.   ssql="select * from cnscu_gr where cstr(id)="&id
  35.   rspx.open ssql,conn,1,3
  36. If not rspx.Eof Then
  37. if name<>"" then rspx("nini")=name
  38. if grjs<>"" then rspx("grjs")=grjs
  39. if grxb<>"" then rspx("grsex")=grxb
  40. if szcs<>"" then rspx("szcs")=szcs
  41. if csrq<>"" then rspx("csrq")=csrq
  42. if sjhm<>"" then rspx("sjhm")=sjhm
  43. if hymm<>"" then rspx("mm")=hymm
  44. if mmwt<>"" then rspx("mmwt")=mmwt
  45. if wtda<>"" then rspx("wtda")=wtda
  46. if myjf<>"" then rspx("myjf")=myjf
  47. if myjb<>"" then rspx("myjb")=myjb
  48. rspx.update
  49. else
  50. cccww="修改失败!"
  51. End if
  52. rspx.close
  53. set rspx=Nothing%>
  54. <%if cccww<>"" then%>
  55. <%=cccwww%>
  56. <%else%>
  57. 修改成功。。。
  58. <%end if%>
  59. ----------<br/>
  60. <a href="hhyy.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回会员管理</a><br/>
  61. <a href="sq.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回社区管理</a><br/>
  62. <a href="admin_index.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回管理首页</a><br/>
  63. <a href="../index.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回网站首页</a><br/>
  64. </p>
  65. </card>
  66. </wml>