asp问题.急!!!删除一条记录

来源:百度知道 编辑:UC知道 时间:2024/05/11 16:20:16
帮我看哪错了.或者给我一个好的也行.多谢了.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/db1.mdb")
Set bb=Server.CreateObject("ADODB.Connection")
bb.Open connstr
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<%
set rs =server.CreateObject("adodb.recordset")
rs.open "select * from gongchengyeji ",bb,1,3
%>
<body>
<table border="1">
<tr>
<td>产品图片<

<td><a href="linkdel.asp?=<%=bh%>">删除</a></td>
改成
<td><a href="linkdel.asp?bh=<%=rs("bh")%>">删除</a></td>

bb.Execute("delete * from gongchengyeji where id='"&id&"'")
改成
bb.Execute("delete * from gongchengyeji where id="&request.querystring("bh")

<td><a href="linkdel.asp?=<%=bh%>">删除</a></td>
改成
<td><a href="linkdel.asp?bh=<%=rs("bh")%>">删除</a></td>

<%
...
dim id
id=Request("bh")
bb.Execute("delete * from gongchengyeji where id='"&id&"'")
改成
bb.Execute("delete * from gongchengyeji where id=" & id )

("delete * from gongchengyeji where id='"&id&"'")
你的ID是字符串吗?
如果你的数据库里设置的是数字类