微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题自己动手做个留言簿
栏目互联网时代
作者刘欢
发布2000年第6期
  Guest-book(留言簿)在网页设计中占有相当重要的地位。留言簿可以用许多编程语言来设计,当然使用最多的还是perl。这里谈谈在编写Guest-book中最应该注意的问题,并给出一个不算很完整的程序代码,你可以改进后使用。
  就现在的情况来看,一个标准的guest-book程序一般包括三个文件。提交表单文件(form.html)、cgi处理文件(guest-book.cgi)和最后的输出文件(book.html)。三者的合作就可以完成留言簿的基本功能-留言。留言簿界面可以随便做,只要注意提交表单指向guest-book.cgi就可以,其它没有太多要求。
  首先我们来看看form.html的文件内容:
  <html>
  <title>guest-book.html</title>
  <h1>留言本</h1>
  <form method="post" action="/cgi-bin/guest-book.cgi">
  <p>名字:<input name="name" size="20">
  <p>email:<input name="email" size="30">
  <p>意见:<textarea name="suggest" cols=30 rows=4></textarea>
  </textarea><p>
  <input type="submit" value="提交">
  <input type="reset" value="取消">
  </form></html>
  <form method="post" action="/cgi-bin/guest-book.cgi">
  将此表单的提交后的动作交给guest-book.cgi程序。
  再看看guest-book.cgi的源代码:
  #! perl (perl在服务器上的绝对位置)
  print"Content-type:text/html\n\n";
  read(STDIN,&buffer,&ENV{'CONTENT_LENGTH'});
  @pairs=split(/&/,&buffer);
  foreach &pair(@pairs){
  (&name,&value)=split(/=/,&pair);
  &value=~tr/+//;
  &value=~s/%([a-f A-F 0-9][a-f A-F 0-9])/pack("C",hex(&1))/eg;
  &FORM{&name}=&value;
  }
  print"<title>留言本</title>";
  print"<h1>留言本</h1>";
  foreach &check(values%FORM){
  if(&check eq""){
  print"<hr size=3>";
  print"<h2>请不要留空";
  exit(0);
  }
  }
  &FORM{'suggest'}=~s/cM\n/<br>\n/g;
  &filename="http://www.yourname.com/book.html";(留言簿的相对位置)
  open(FILE,">> &filename");
  print FILE "名字:&FORM{'name'}<br>\n";
  print FILE "Email:<a href="mailto:&FORM{'email'}>&FORM{'email'}</a><br>\n"}";
  print FILE "留言:&FORM{'suggest'}";
  close{FILE};
  print "<h2>谢谢留言</h2>";
  print"<a href=\"book.html\">请观看留言本</a>";
  exit(0);
  这个程序相当简单,但它具备所有的CGI-Guest程序的特点,我们一一分析如下:
  首先,
  read(STDIN,&buffer,&ENV{'CONTENT_LENGTH'});
  @pairs=split(/&/,&buffer);
  foreach &pair(@pairs){
  (&name,&value)=split(/=/,&pair);
  &value=~tr/+//;
  &value=~s/%([a-f A-F 0-9][a-f A-F 0-9])/pack("C",hex(&1))/eg;
  &FORM{&name}=&value;
  }
  这是一段表单分析的语句,在前面的程序里,估计大家也都见过了。
  其次:
  foreach &check(values%FORM){
  if(&check eq""){
  print"<hr size=3>";
  print"<h2>请不要留空";
  exit(0);
  }
  }
  做输入字段的检查,看看是否有留空的现象。从前这种任务都是要CGI程序来验证的,比如E-mail栏中输入的是否E-mail地址检查等。不过现在我们可以通过javascript来做这样的检查,这样服务器的负担将大大减轻。
  最后:
  &filename="http://www.yourname.com/book.html";
  open(FILE,">> &filename");
  print FILE "名字:&FORM{'name'}<br>\n";
  print FILE "Email:<a href="mailto:&FORM{'email'}>&FORM{'email'}</a><br>\n"}";
  print FILE "留言:&FORM{'suggest'}";
  close{FILE};
  print "<h2>谢谢留言</h2>";
  print"<a href=\"book.html\">请观看留言本</a>";
  exit(0);
  输出内容到文件和屏幕上。完成留言的程序。
  book.html:
  这个程序中对book.html没有什么特别的要求,可以不用写,就让程序自动生成。现在有的cgi程序对book.html也有设定,比如在<head></head>之间就写上注释<!--这是留言开始--!><!--这是留言结束--!>这样,在程序对留言数据操作的时候,就可以忽略掉文件内的其他内容。
  看完了这个简单的自制留言簿程序,你是不是想自己做一个呢?只要你用HTML语言把form.html做的漂亮一点,再把guest-book.cgi写好就可以放在支持CGI的免费个人主页的主机上(设好权限,以免被别人抓走了),你就可以炫耀了:“这是我自己做的留言簿,感觉怎么样?”相信很多“菜鸟”一定会对你佩服得五体投地!