cjglcl.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. <!--#include file="conn.inc"-->
  6. <!--#include file="cnscu_sb.asp"-->
  7. <wml>
  8. <head>
  9. <meta http-equiv="Cache-Control" content="no-Cache"/>
  10. <meta http-equiv="Cache-Control" content="max-age=0"/>
  11. <meta http-equiv="Expires" content="Mon, 1 Jan 1990 00:00:00 GMT"/>
  12. </head>
  13. <card id="main" title="采集设置" >
  14. <p>
  15. <%
  16. name=usb(request("name"))
  17. logo=usb(request("logo"))
  18. ym=usb(request("ym"))
  19. dq=usb(request("dq"))
  20. '----识别错误并跳转-----
  21. if name="" then response.redirect "cjgl.asp?sb="&sb&"&cw=1&ok="&lx&"&id="&id&""
  22. '---开始修改----
  23. set rs=Server.CreateObject("ADODB.Recordset")
  24. rspl="select * from upset where id=1"
  25. rs.open rspl,conn,1,2
  26. if name<>"" then rs("formPath")=name
  27. if logo<>"" then rs("filesize")=logo
  28. if dq<>"" then rs("allowedfile")=dq
  29. rs.update
  30. '---关闭数据----
  31. rs.close
  32. set rs=nothing
  33. %>
  34. 设置成功<br/>
  35. ----------<br/>
  36. <a href="admin_index.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回管理首页</a><br/>
  37. <a href="/index.asp?fs=<%=fs%>&amp;sb=<%=sb%>">返回网站首页</a><br/>
  38. 报时:<%=time%>
  39. </p></card></wml>