|
步骤二:编写“加入精彩留言”的留言处理程序(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中。 |