我在编删除分类时遇到了问题.
我原想点击删除某个分类时同时也删除该分类下的全部数据.
可是有问题.
IE一直提示11行有错.
请各位帮忙看看.
<%
if request("type_id")=empty then
message="请输入将要删除的图书分类ID号!"
call error(message)
response.End
end if
set delete_data=server.CreateObject("adodb.recordset")
sql="delete from data where type_id="& request("type_id")
delete_data.open sql,conn,3,3
set delete_type=server.CreateObject("adodb.recordset")
sql1="delete from type where type_id="& request("type_id")
delete_type.open sql1,conn,3,3
delete_data.close
delete_type.close
set delete_data=nothing
set delete_type=nothing
call delete_ok()
%>
<% sub delete_ok()%>
bgcolor="#999999">
删除分类 |
成功删除分类,系统将在2秒种后自动跳转...... |
<% end sub %>
