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

手机WAP编程

开发平台:

ASP/ASPX

  1. <!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">
  2. <html>
  3. <!--#include file="admin_sb.asp"-->
  4. <head>
  5. <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  6. </head><body><body bgcolor="#fcefff">
  7. <%
  8. '====================================================================
  9. ' 请你保留这段说明,这并不会影响你的速度.   电脑交流:http://www.cnscu.cn
  10. ' 程序制作:横云   掌上校园收倾心整理收集于互联网,感谢你的支持!
  11. ' 升级时间: 2008-2-5   主页地址:HTTP://wap.cnscu.cn
  12. ' E-Mail: cnscu@126.com    客服QQ:554904632 QQ群:30493504 QQ群2:46659883
  13. '====================================================================
  14. %> <%
  15. id=dlubb(request("id"))
  16. if id="" then id="0"
  17. iid=dlubb(request("iid"))
  18. if iid="" then iid="0"
  19. set rss=Server.CreateObject("ADODB.Recordset")
  20. rsppls="select * from wap_lm where id="&id
  21. rss.open rsppls,conn,1,2
  22. if rss.eof then 
  23. response.write("出错了!无此栏目<br/>")
  24. else%>
  25. 项目编号:<%=rss("id")%><br/>
  26. 项目名称:<%=ubb(rss("nxn"))%><br/>
  27. ----------<br/>
  28. <%end if
  29. set rs=Server.CreateObject("ADODB.Recordset")
  30. rsppl="select * from wap_lm where id="&iid
  31. rs.open rsppl,conn,1,2
  32. if rs.eof then 
  33. response.write("移动到首页<br/>")
  34. else
  35. %>
  36. 当前位置:<%=rs("id")%><br/>
  37. 页面名称:<%=ubb(rs("nxn"))%><br/>
  38. <a href="yd_lc.asp?sb=<%=sb%>&amp;fs=<%=fs%>&amp;id=<%=id%>&amp;iid=<%=iid%>">选择当前位置</a><br/>
  39. <a href="yd_lm.asp?sb=<%=sb%>&amp;id=<%=id%>&amp;fs=<%=fs%>">返回上级页面</a><br/>
  40. <%end if%>
  41. <%if iid="0" then%>
  42. <a href="yd_lc.asp?sb=<%=sb%>&amp;fs=<%=fs%>&amp;id=<%=id%>&amp;iid=<%=iid%>">确定移动到首页</a><br/>
  43. <a href="yd_lm.asp?sb=<%=sb%>&amp;id=<%=id%>&amp;fs=<%=fs%>">返回上级页面</a><br/>
  44. <%end if%>
  45. </table>
  46. </body>
  47. </html>