|
蓝森林 http://www.lslnet.com 2006年8月25日 8:28
 SQL删除语句，不知道错在哪里了，请指教
<!-- #include file="save.asp" -->
<%
Action=trim(request("Action"))
if Action="del_b_class" then
Call del_class()
else
Call main()
end if
sub main()
%>
<form name="form2" method="post" action="admin_b_class.asp">
管 理 分 类：
<select name="b_class" class="cp2">
<%
sql = "SELECT * FROM b_class"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,1,1
if rs.eof and rs.bof then
Response.Write"<option>还没有任何分类</option>"
else
do while not rs.eof
Response.Write"<option value='"&rs("a_id")&"'>"&rs("a_name")&"</option>"
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
<input type="submit" name="Submit222" value="确定">
<input name="Action" type="hidden" value="del_b_class">
</form>
<%
end sub
sub del_class()
dim id
id=trim(request("b_class")) ‘获取数字类型的a_id给id
sql="delete * from b_class where a_id=id " ’大概错误在这里
conn.execute sql
response.Write("删除成功")
end sub
%>
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access Driver] 参数不足，期待是 1。
/241/myweb/admin_b_class.asp, 第 39 行
|
id=trim(request("b_class")) ‘获取数字类型的a_id给id
[color=red]sql="delete * from b_class where a_id="&id [/color]
如果是你的id是数字就用上面的，不是就用下面的语句
或是sql="delect * from b_class where a_id='"&id&"'" |
| 朋友，非常感谢，同时我也想给我两拳。 |
| conn.execute sql-->conn.execute(sql) |
|
