delbook.asp

网络书店

 <%
set conn=server.createobject("adodb.connection")
conn.open  "Provider=sqloledb;" & "Data Source=SNB\MH123;Initial Catalog=Bookstore;User Id=sa;Password=jzh1015;"  
%>
<% 
set rs=server.CreateObject("adodb.recordset")
sql="delete Shelf where shelf_id='"&request("shelf_id")&"'"
rs.open sql,conn,3,3
%>
<script language=javascript>
				     alert("删除成功!");
			    	 window.location="bookcoll.asp" 
</script>