ASP进阶教程Ⅳ:加入精彩留言

无2名3

无2名3

2016-01-29 19:00

ASP进阶教程Ⅳ:加入精彩留言,ASP进阶教程Ⅳ:加入精彩留言
  当有一天你在你的留言簿的留言记录中看到了一条十分精彩的留言,为了介绍给你的网友们,你是否会考虑将这些留言用单独的页面显示,让更多的上网者更容易地看到呢?假如真如我所说这样,那么只要你看完这一章的内容即可使你如愿以偿。
  要给留言簿加添“加入精彩留言”功能,同样可以通过三个步骤来实现。  
步骤一:首先,在留言数据库中新建一专门用来存放精彩留言的数据表(如perfect).
因为用来存放精彩留言的数据表的结构与存放留言的数据表的结构是相同的,因此创建perfect数据表最简单的方法是COPY留言数据表guestbook的结构,然后粘贴、确定后即可。如下图:
       
步骤二:编写“加入精彩留言”的留言处理程序(wonderful.asp).
< !--#include file="adovbs.inc" --
< !--#include file="post.asp" --
< % ID = Request.Querystring("ID") %
< %
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("book2.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql ="DELETE * FROM perfect WHERE (ID = " & Request.QueryString("id") & ")" Set rs = conn.Execute( sql )
sql="insert into perfect select * from guestbook where (ID = " &        Request.QueryString("id") & ")"
Set rs = conn.Execute( sql )
%
'为了避免当我们在操作“加入精彩留言”的过程中,连续对某条留言重复了该项操作而引发的错误,我们可以不理它三七二十一,先将perfect数据表中凡是ID = " & Request.QueryString("id") & "的留言记录删除,再将留言数据表guestbook中ID = " & Request.QueryString("id") & "的留言插入到数据表perfect中。
步骤三:设计留言被加入到精彩留言数据表之后转入的页面(post.asp)。  

  
展开更多 50%)
分享

猜你喜欢

ASP进阶教程Ⅳ:加入精彩留言

ASP
ASP进阶教程Ⅳ:加入精彩留言

ASP进阶教程Ⅵ:留言簿在线删除留言

ASP
ASP进阶教程Ⅵ:留言簿在线删除留言

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

ASP进阶教程Ⅸ:留言查询功能(一)

ASP
ASP进阶教程Ⅸ:留言查询功能(一)

ASP进阶教程Ⅸ:留言查询功能(二)

ASP
ASP进阶教程Ⅸ:留言查询功能(二)

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

ASP进阶教程:留言查询功能(一)

ASP
ASP进阶教程:留言查询功能(一)

ASP进阶教程Ⅴ:留言簿在线留言编辑(一)

ASP
ASP进阶教程Ⅴ:留言簿在线留言编辑(一)

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

LILO及引导软盘各种用法汇总

LILO及引导软盘各种用法汇总

利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 (三)

利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 (三)
下拉加载更多内容 ↓