快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

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)。
返回类别: 教程
上一教程: JMAIL实例
下一教程: 实例讲解ASP抓取网上房产信息

您可以阅读与"ASP进阶教程Ⅳ:加入出色留言"相关的教程:
· ASP进阶教程Ⅰ:循序渐进学留言薄
· ASP进阶教程Ⅹ:留言簿自动发E-MAIL
· ASP进阶教程Ⅸ:留言查询功能(一)
· ASP进阶教程Ⅸ:留言查询功能
· ASP进阶教程Ⅷ:数据库版本的留言簿
    微笑服务 优质保证 索取样品