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

手机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. <wml><%
  7. '====================================================================
  8. ' 请你保留这段说明,这并不会影响你的速度.   电脑交流:http://www.cnscu.cn
  9. ' 程序制作:横云   掌上校园收倾心整理收集于互联网,感谢你的支持!
  10. ' 升级时间: 2008-2-5   主页地址:HTTP://wap.cnscu.cn
  11. ' E-Mail: cnscu@126.com    客服QQ:554904632 QQ群:30493504 QQ群2:46659883
  12. '====================================================================
  13. %> <head>
  14. <meta http-equiv='Cache-Control' content='no-cache'/>
  15. </head>
  16. <card title="注册成功">
  17. <p>
  18. <%
  19. idd=usb(request("idd"))
  20. cw=usb(request("cw"))
  21. set zhlhp=Server.CreateObject("ADODB.Recordset")
  22.   zhhssqllp="select name from ltjb where CStr(id)=1"
  23.   zhlhp.open zhhssqllp,conn,1,1
  24. ltname=zhlhp("name")
  25. zhlhp.close
  26. set zhlhp=nothing%>
  27. 欢迎您第一次来到<%=ltname%>,系统已经自动为您注册一个ID了<br/>
  28. 但为了您的账号安全您还须填写完以下资料才可以进入社区<br/>
  29. <%
  30. set zhh=Server.CreateObject("ADODB.Recordset")
  31.   zhhssql="select * from cnscu_gr where sfyk=0 and cstr(id)="&idd
  32.   zhh.open zhhssql,conn,1,3
  33. if zhh.eof then
  34. response.redirect "cnscu_grdl.asp?cw=18"
  35. else
  36. if cw="3" then%>
  37. 以下各项均必添!<br/>
  38. ----------<br/>
  39. <%elseif cw="4" then%>
  40. 禁止使用的昵称!<br/>
  41. ----------<br/>
  42. <%end if%>
  43. -找回密码资料-<br/>
  44. 密码问题<input name="mmwt<%=minute(now)%><%=second(now)%>" title="密码问题" value=""/><br/>
  45. 密码答案<input name="wtda<%=minute(now)%><%=second(now)%>" title="密码答案" value=""/><br/>
  46. 您的性别<select name='xb<%=minute(now)%><%=second(now)%>' value='3'>
  47. <option value="1">男性</option>
  48. <option value="2">女性</option>
  49. <option value="3">保密</option>
  50. </select><br/>
  51. 性别一经选择将不能改变!<br/>
  52. 保密选项除外<br/>
  53. --------<br/>
  54. 牢记您的个人资料<br/>
  55. 社区ID:<%=idd%><br/>
  56. 会员昵称:<input name="myni<%=minute(now)%><%=second(now)%>" title="会员昵称" value="<%=zhh("nini")%>"/><br/>
  57. 手机号码:<%=zhh("sjhm")%><br/>
  58. 登陆密码:<%=zhh("mm")%><br/>
  59. <anchor>进入社区
  60.     <go href="dyccl.asp?idd=<%=idd%>" method="post" accept-charset="utf-8">
  61.         <postfield name="mmwt" value="$(mmwt<%=minute(now)%><%=second(now)%>)"/>
  62.         <postfield name="wtda" value="$(wtda<%=minute(now)%><%=second(now)%>)"/>
  63.         <postfield name="myni" value="$(myni<%=minute(now)%><%=second(now)%>)"/>
  64.         <postfield name="myxb" value="$(xb<%=minute(now)%><%=second(now)%>)"/>
  65.     </go>
  66. </anchor><br/>
  67. <%end if%>
  68. </p>
  69. </card>
  70. </wml>