欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

[emacs-cgi] 登进页面

更新时间: 2014-01-05 02:04:00 责任编辑: Author_N1

 

[Emacs-cgi] 登入页面

最新进展:Emacs-cgi 加入对存取 Cookie 和 Session 的支持,以及页面之间跳转(redirect和forward)。项目地址:https://github.com/redraiment/emacs-cgi。下面以一个登入页面作为示例:

首先是首页:如果用户为登入,显示输入框提示用户输入用户名;否则输出欢迎词。

#!/usr/local/bin/elisp

(require 'cgi)

(html
 (head
  (title "Hello Session")
  (meta (http-equiv . "Content-Type")
        (content . "text/html; charset=UTF-8")))
 (body
  (h1 "Welcome to Emacs Lisp CGI")
   <%
   (if (cgi/session "name")
       (form (method . post) (action . "logout.el")
        (div
         "Hello " <%= (cgi/session "name") %>
         (button (type . submit) logout)))
     (form (method . post) (action . "login.el")
      (div
       "My name is: "
       (input (type . text)
              (name . name))
       (button (type . submit) Submit))))
   %>)))

然后登入处理页面,在 session 中设置名字。

#!/usr/local/bin/elisp

(require 'cgi)

(if (cgi/param "name")
    (cgi/session "name" (cgi/param "name")))
(cgi/redirect "index.el")

最后是退出处理页面,即清空 session 中的值。

#!/usr/local/bin/elisp

(require 'cgi)

(cgi/remove-session "name")
(cgi/redirect "index.el")

运行效果:



上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:04:00
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/5238/
本文WWW.DOC100.NET DOC100.NET版权所有。