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

手机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. <wml><%
  6. '====================================================================
  7. ' 请你保留这段说明,这并不会影响你的速度.   电脑交流:http://www.cnscu.cn
  8. ' 程序制作:横云   掌上校园收倾心整理收集于互联网,感谢你的支持!
  9. ' 升级时间: 2008-2-5   主页地址:HTTP://wap.cnscu.cn
  10. ' E-Mail: cnscu@126.com    客服QQ:554904632 QQ群:30493504 QQ群2:46659883
  11. '====================================================================
  12. %> <head>
  13. <meta http-equiv="Cache-Control" content="no-cache" forua="true"/>
  14. <meta http-equiv="Cache-Control" content="max-age=0" forua="true"/>
  15. </head>
  16. <card title="!出错啦!">
  17. <p>
  18. 获取变量
  19. <% 
  20. dim url 
  21. url=url&"http://"&request.ServerVariables("Server_NAME")&request.ServerVariables("SCRIPT_NAME") 
  22. if(len(trim(request.ServerVariables("QUERY_STRING")))>0) then 
  23.  url=url & "?" & request.ServerVariables("QUERY_STRING") 
  24. end if 
  25. response.Write url
  26. %>
  27. <a href='http://love.mfyys.com'>进入</a>
  28. </p>
  29. </card>
  30. </wml>