10天掌握ASP第十课:实例:留言本系统
作者:小虫 日期:2009-06-04
好多天没和大家见面了,对不起,手头上刚做好了一个工程,FLASH课的作业也在做,自己又在开发ZhiIN,所以,时间有些紧。。。
现在是第十课,也是本教学中最后的一课了,这里,我们再做一个简单的留言本系统。
做ASP程序,大家还记得第一步是什么吗?就是做数据库了,我们新建一个数据库,按下图,设计一个表:

然后,我们再找一个conn.asp来,设置好里面相关的连接路径等:

这个conn.asp在《10天掌握ASP第九课:实例:会员登录功能》有下载!
新建一个ASP VBScript页面,设计一下,大概这个样子,当然,你可以做得比小虫的更美观:

切换到代码模式,记得哦,要引用conn.asp,如图:

代码中,我们有两个Table,一个是显示留言信息,一个是显示发表留言的框的(我的是这样,不知道你们的呢。。。)
然后,将第一个Table,就是显示留言信息的那一块,改成ASP查数据的循环内容:代码如下:
ASP/Visual Basic Code复制内容到剪贴板
- <%
- sql="select * from VK_Guestbook order by G_ID desc"
- set rs=conn.execute(sql)
- if rs.eof and rs.bof then
- Response.Write("<p class=center>当前没有任何留言</p>")
- else
- do while not rs.eof
- %>
- <table width="75%" border="1" align="center" cellpadding="0" cellspacing="0">
- <tr>
- <td width="13%">留言者信息:</td>
- <td width="87%"><%=rs("G_Guest")%> 发表于<%=rs("G_Posttime")%></td>
- </tr>
- <tr>
- <td colspan="2"><%=rs("G_Content")%></td>
- </tr>
- </table>
- <%
- rs.movenext
- loop
- end if
- %>
这代码很简单,就不多说了。
评论: 0 条 | 查看: - 次
发表评论
上一篇
下一篇

文章来自:
Tags:
相关日志: