教你做个简单的祝福台
作者:admin 日期:2005-06-07
很多个人网站都有一个小小的祝福程序，其实这不是很难的喔，就像德仔工作室合作网站珠玑巷(http://www.zhujixang.com）里面的那个小小的祝福台，下面我们一起来试着做做吧:)[face1]
1.首先，我们要准备设计之前的一些东东
软件：DreamweaverMx MsOffice Photoshop 主要就这几样软件的，当然，假若你HTML 比较拽，你就用editplus来写代码吧，本人一般都用它来看程序的,检查错误代码用它多.
2.开始动手吧
(1)我们在Dreamweaver里面新建一个站点，祝福就用bestwishes吧,站名确定后，最好建立相应的文件夹,比如放图片的images 放数据库的data 等等，如图
我们可以看到一些文件也在其中，因为这个程序不是很复杂，所以我们可以先把几个空白文件设置好.当然，你在做的时候边想边做是最好的啦[face1]
(2)数据库设计
还是先搞acess吧，SQL的慢慢来.这个程序的数据库主要就二个表，一个是祝福部分，另一个是管理员部分，我们主要看祝福部分，主要就是三个字段，外加一个ID自动编号的字段，所以总体下来我们对这程序设计成二个表，一个是admin,一个是main，设置如图
其中在admin表中， 设置了一个flag是为了以后的程序可以设置管理员的级别,如图
同样，在main中设置了主要有祝福人，被祝福人，祝福语,ID，时间五个字段.如图
这里面，把时间的默认值写成now()，时间就会自动更新啦！
(3)页面设计
把数据库设计搞掂，就搞页面了，这里的页面没有搞多少美化，大家可以自已搞一哈哈撒！页面主要是
填写表单form的页面，祝福展示面，管理员登录页面，编辑页面，还有删除页面，这次，我们只讲前台部分，后台等下次了.祝福部分其实就三个页面，add.asp 增加 addok.asp 提交数据 conn数据库连接 show.asp祝福展示页面,管理员的就是login.asp登录页面，edit页面,delete页面，相信当你做完这个程序后，你对ASP的理解就大大增强了![face2]
A.我们开始做add.asp这东东吧，这个其实就是一个表单了!设计如图:
现在流行虚线表格，我就来搞个吧，代码如下，是用CSS来做的
这里的表单提交按钮是用一张图片做的，注意表单的设置
这个页面就差不多OK了！是不是很快呀！[face3]
B.conn页面，这个是连接数据库的页面，表面看起来很复杂，其实现在你在baidu.com上search一下，数据库连接 ，你就直接可以找到了，为了方便，我就是这样做的喔！！！
conn.asp一般都是这样的，可以通用，我晕，不到1分钟，我们又搞定一个页面了！[face5]
C.addok.asp
这个还是比较复杂的喔，虽然看不到，但它是起到比较关键的作用喔！！
原理主要是这样的：首先，连接到数据库，然后打开，之后接受来自add.asp的表单数据，把它提交到数据库中，最后把它显示show.asp中.
我把程序按从上到下都分成四段了，这样很容易看懂的！
NO.1 打开数据库
No.2获取表单数据
NO.3提交数据
No.4 关闭连接，转向show.asp
把这些写完，整个程序就差不多了！看来,才不到60分钟呀！
D.show.asp
提交后总要看到嘛，就要用到show.asp了！我们已经搞掂了conn.asp，可以通过直接调用了，其实show.asp的原理比addok.asp更easy，只是读取数据库中的数据就可以了，只是要注意一点循环的位置。
如图:
注意：这个页面没有实现分页，分页这东东，还是下次啦
,我把关键部分说一哈哈撒：）
这块是通过读取数据库中的main表，以ID的值排序
这块就是主体了，通过一个简单的循环将表main里面的字段的值读出来。
<%
dim i
i=1
while not rs.eof
%>
<%
i=i+1
rs.movenext
wend
rs.close
%>
你看，这页面又搞成了！[face3]唉，都搞完了，我还搞什么？？
不到2个小时，你就差不多搞完一个祝福的程序了，拽！先写到这吧，明天再来！
要等别感谢好友五紫风，他这家伙指出了一个我漏掉的错误，唉，就这样了！初次写这东东，多多指教!
源程序下载:http://www.dezai.net/blog/work/wishes.rar
1.首先，我们要准备设计之前的一些东东
软件：DreamweaverMx MsOffice Photoshop 主要就这几样软件的，当然，假若你HTML 比较拽，你就用editplus来写代码吧，本人一般都用它来看程序的,检查错误代码用它多.
2.开始动手吧
(1)我们在Dreamweaver里面新建一个站点，祝福就用bestwishes吧,站名确定后，最好建立相应的文件夹,比如放图片的images 放数据库的data 等等，如图
我们可以看到一些文件也在其中，因为这个程序不是很复杂，所以我们可以先把几个空白文件设置好.当然，你在做的时候边想边做是最好的啦[face1]
(2)数据库设计
还是先搞acess吧，SQL的慢慢来.这个程序的数据库主要就二个表，一个是祝福部分，另一个是管理员部分，我们主要看祝福部分，主要就是三个字段，外加一个ID自动编号的字段，所以总体下来我们对这程序设计成二个表，一个是admin,一个是main，设置如图
其中在admin表中， 设置了一个flag是为了以后的程序可以设置管理员的级别,如图
同样，在main中设置了主要有祝福人，被祝福人，祝福语,ID，时间五个字段.如图
这里面，把时间的默认值写成now()，时间就会自动更新啦！
(3)页面设计
把数据库设计搞掂，就搞页面了，这里的页面没有搞多少美化，大家可以自已搞一哈哈撒！页面主要是
填写表单form的页面，祝福展示面，管理员登录页面，编辑页面，还有删除页面，这次，我们只讲前台部分，后台等下次了.祝福部分其实就三个页面，add.asp 增加 addok.asp 提交数据 conn数据库连接 show.asp祝福展示页面,管理员的就是login.asp登录页面，edit页面,delete页面，相信当你做完这个程序后，你对ASP的理解就大大增强了![face2]
A.我们开始做add.asp这东东吧，这个其实就是一个表单了!设计如图:
现在流行虚线表格，我就来搞个吧，代码如下，是用CSS来做的
复制内容到剪贴板
程序代码
程序代码textarea {
font-size: 12px;
font-style: normal;
line-height: 15px;
color: #FF0000;
border: 1px dotted #0099FF;
}
input {
font-size: 12px;
font-style: normal;
line-height: 150px;
color: #FF0000;
border: 1px dotted #0099FF;
font-size: 12px;
font-style: normal;
line-height: 15px;
color: #FF0000;
border: 1px dotted #0099FF;
}
input {
font-size: 12px;
font-style: normal;
line-height: 150px;
color: #FF0000;
border: 1px dotted #0099FF;
这里的表单提交按钮是用一张图片做的，注意表单的设置
这个页面就差不多OK了！是不是很快呀！[face3]
B.conn页面，这个是连接数据库的页面，表面看起来很复杂，其实现在你在baidu.com上search一下，数据库连接 ，你就直接可以找到了，为了方便，我就是这样做的喔！！！
复制内容到剪贴板 程序代码
程序代码<%
dim conn
dim connstr
dim db
db="data/bestwishes.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>
dim conn
dim connstr
dim db
db="data/bestwishes.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>
conn.asp一般都是这样的，可以通用，我晕，不到1分钟，我们又搞定一个页面了！[face5]
C.addok.asp
这个还是比较复杂的喔，虽然看不到，但它是起到比较关键的作用喔！！
原理主要是这样的：首先，连接到数据库，然后打开，之后接受来自add.asp的表单数据，把它提交到数据库中，最后把它显示show.asp中.
我把程序按从上到下都分成四段了，这样很容易看懂的！
NO.1 打开数据库
复制内容到剪贴板 程序代码
程序代码<%@LANGUAGE="vbSCRIPT" CODEPAGE="936"%>
<%
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data/bestwishes.mdb")
set db= Server.CreateObject("ADODB.Connection")
db.Open connstr
%>
<%
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data/bestwishes.mdb")
set db= Server.CreateObject("ADODB.Connection")
db.Open connstr
%>
No.2获取表单数据
复制内容到剪贴板 程序代码
程序代码<%
beizhufuren=request.Form("beizhufuren")
zhufuyu=request.form("zhufuyu")
zhufuren=request.form("zhufuren")
%>
beizhufuren=request.Form("beizhufuren")
zhufuyu=request.form("zhufuyu")
zhufuren=request.form("zhufuren")
%>
NO.3提交数据
复制内容到剪贴板 程序代码
程序代码<%
set rs=server.createobject("adodb.recordset")
sql="select * from main where (id is null)"
rs.open sql,db,1,3
rs.addnew
rs("beizhufuren")=beizhufuren
rs("zhufuyu")=zhufuyu
rs("zhufuren")=zhufuren
rs.update
%>
set rs=server.createobject("adodb.recordset")
sql="select * from main where (id is null)"
rs.open sql,db,1,3
rs.addnew
rs("beizhufuren")=beizhufuren
rs("zhufuyu")=zhufuyu
rs("zhufuren")=zhufuren
rs.update
%>
No.4 关闭连接，转向show.asp
复制内容到剪贴板 程序代码
程序代码<%
rs.close
set rs=nothing
%>
<%
response.write "提交成功"
response.Redirect("show.asp")
%>
rs.close
set rs=nothing
%>
<%
response.write "提交成功"
response.Redirect("show.asp")
%>
把这些写完，整个程序就差不多了！看来,才不到60分钟呀！
D.show.asp
提交后总要看到嘛，就要用到show.asp了！我们已经搞掂了conn.asp，可以通过直接调用了，其实show.asp的原理比addok.asp更easy，只是读取数据库中的数据就可以了，只是要注意一点循环的位置。
如图:
注意：这个页面没有实现分页，分页这东东，还是下次啦
,我把关键部分说一哈哈撒：）这块是通过读取数据库中的main表，以ID的值排序
复制内容到剪贴板 程序代码
程序代码<%
set rs=server.createobject("adodb.recordset")
sql="select * from main order by id asc"
rs.open sql,conn,1,1
%>
set rs=server.createobject("adodb.recordset")
sql="select * from main order by id asc"
rs.open sql,conn,1,1
%>
这块就是主体了，通过一个简单的循环将表main里面的字段的值读出来。
复制内容到剪贴板 程序代码
程序代码<%
dim i
i=1
while not rs.eof
%>
![]("images/girl01.gif") | <%=rs("zhufuren")%>祝福<%=rs("beizhufuren")%> |
祝福语
| |
| 时间<%=rs("shijian")%> |
<%
i=i+1
rs.movenext
wend
rs.close
%>
你看，这页面又搞成了！[face3]唉，都搞完了，我还搞什么？？
不到2个小时，你就差不多搞完一个祝福的程序了，拽！先写到这吧，明天再来！
要等别感谢好友五紫风，他这家伙指出了一个我漏掉的错误，唉，就这样了！初次写这东东，多多指教!
源程序下载:http://www.dezai.net/blog/work/wishes.rar
上一篇: 
下一篇: 
文章来自: 
引用通告: 
Tags: 
相关日志:
评论: 0 | 引用: 921 | 查看次数: 31090
发表评论
