del.asp

一个用Dreamweaver制作的留言本

<!--#include file="conn.asp"-->
<!--#include file="adovbs.inc"-->


<% 
id=request("id")
set cmd=server.createobject("ADODB.command")
cmd.activeconnection=conn
cmd.commandtext="sp_ebook"
Cmd.CommandType=adCmdStoredProc 
set param1=cmd.createparameter("@choice",advarchar,adparaminput,50)
cmd.parameters.append param1
set param2=cmd.createparameter("@id",advarchar,adparaminput,50)
cmd.parameters.append param2
cmd("@choice")="del"
cmd("@id")=id
cmd.execute
response.write "<script>alert('删除成功');location.href('index.asp');</script>"

%>