xx_scbt.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. <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. %> <!--#include file="conn.inc"-->
  13. <head>
  14. <meta http-equiv='Cache-Control' content='no-cache'/>
  15. </head>
  16. <%
  17. idxx=usb(request("id"))
  18. cnscu=usb(request("cnscu"))
  19. qr=usb(request("qr"))
  20. if qr="" then qr="1"%>
  21. <card title="删除消息" ontimer="xx_list.asp?cnscu=<%=cnscu%>">
  22. <timer value="25"/>
  23. <p>
  24. 无操作15秒自动返回。<br/>
  25. <!--#include file="cnscucsb.asp"-->
  26. <%if qr="1" or qr="" then%>
  27. 是否确认删除该消息?<br/>
  28. 删除后不可以恢复<br/>
  29. <a href='xx_scbt.asp?cnscu=<%=cnscu%>&amp;qr=2&amp;idxx=<%=idxx%>'>确认</a>*|*<a href='xx_view.asp?cnscu=<%=cnscu%>&amp;id=<%=idxx%>'>等等</a>
  30. <%else%>
  31. <%
  32. dim id
  33.  id=usb(request("idxx"))
  34.  url=usb(request("url"))
  35.  dlid=usb(request("dlid"))
  36. sql="delete from tbxx Where CStr(id)='" & id & "' and CStr(sid)='" & myid & "'"
  37.   conn.Execute(sql)%>
  38. 成功删除该信息!<br/>
  39. 正在返回消息中心。。
  40. <%end if%>
  41. <br/>-----------<br/>
  42. <a href="xx_view.asp?cnscu=<%=cnscu%>&amp;id=<%=id%>">回到上级</a><br/>
  43. </p>
  44. </card>
  45. </wml>