|
第九章：Guest book
Guest-book在网页设计中占有相当重要的地位, 以至于可以和记数器相提并论。 留言本可以用许多编程语言来设计, 当然使用最多的还是perl和vb两种。 本次cgi教程我们将谈谈在编写Guest-book中最应该注意的问题, 并将给出一个不算很完整的程序代码。 同时提供一个C语言的win-cgi程序供大家下载。
就现在的情况来看, 一个标准的guest-book程序一般包括三个文件。 提交表单文件
（form.html)、cgi处理文件(guest-book.cgi)和最后的输出文件（book.html)。 有些vb程序以access数据库为后台存储格式, 以方便用户查找留言。 下图给出了guest-book的工作流程。
form.html
首先我们来看看form.html的文件内容：
<html>
<title>guest-book.html</title>
<h1>留言本</h1>
<form
method="post"
action="/cgi-shl/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-shl/guest-book.cgi">
将此表单的提交后的动作交给guest-book.cgi程序。
guest-book.cgi
#!
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="c:/website/htdocs/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程序来验证的, 比如email是否输入的是mail地址等检查。 不过现在我们可以通过javascript来做这样的检查, 这样服务器的负担将大大减轻。
最后：
$filename="c:/website/htdocs/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>之间就写上注释
<!--这是流言开始--!>
<!--这是流言结束--!>
这样, 在程序对留言数据操作的时候, 就可以忽略掉文件内的其他内容。
最后, 我为各位找到一个用C写的guestbook程序, 它是在win平台上运行的, 具有非常好的兼容性。 同时它采用了临时文件的方式来传递信息。 所以你需要设定.ini文件。 好了, 这课到此为止。
|