在删除记录的时候如何增加一个限制条件，高手进来帮忙，谢谢！
删除.rar
(8 KB)
附件里面是我的代码，可以正常删除记录。
现在的问题是我想在删除记录的时候增加一个限制条件，判断数据库表book中字段“zt”的值，如果是“0”可以删除，如果是“1”不能删除。
数据库：db.mdb
表：book
字段如下：
读取数据页面index.asp代码如下：
程序代码：<%
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.mappath("db.mdb")+";Persist Security Info=False"
set conn = Server.CreateObject("ADODB.Connection")
conn.open strConn
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>删除记录</title>
<script language=JavaScript>
<!--
function DoEmpty(params)
{
if (confirm("删除后将无法恢复！"))
window.location = params ;
}
//-->
</script>
</head>
<body>
<%
sql="select * from book"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.Write("<font color=red>对不起，没有记录！</font>")
else
do while not rs.eof
%>
<table width="100" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><%=rs("mc")%></td>
<td><a href="javascript:DoEmpty('del.asp?id=<%=rs("id")%>');">删除</a></td>
</tr>
</table>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</body>
</html>删除数据Del.asp页面代码如下：
程序代码：<%
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.mappath("db1.mdb")+";Persist Security Info=False"
set conn = Server.CreateObject("ADODB.Connection")
conn.open strConn
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>Del</title>
</head>
<body>
<%
set rs=server.CreateObject("adodb.recordset")
conn.execute "delete from book where ID = "&Request("id")
conn.close
set conn=nothing
Response.write "删除成功！"
%>
</body>
</html>整个代码是正常的，现在我想增加一个删除前的限制条件：
如果字段“zt”的值为“0”则这条记录可以删除，如果值为“1”那么提示这条记录就不允许删除。
请问怎么实现，谢谢！
