删除
作者:cmscn 日期:2007-05-11
调用
<a href=bm_del.asp?ID=<%=rs("ID")%>>删除</a>
引用内容
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
set conn=server.createobject("adodb.connection")
dbpath=server.mappath("..\dbasef\baoming.asa")
conn.open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & dbpath
set rs=server.createobject("adodb.recordset")
sql="select * from bm where id=" & request("id")
rs.open sql,conn,3,3
rs.delete
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect("baoming_search.asp")
%>
<%
set conn=server.createobject("adodb.connection")
dbpath=server.mappath("..\dbasef\baoming.asa")
conn.open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & dbpath
set rs=server.createobject("adodb.recordset")
sql="select * from bm where id=" & request("id")
rs.open sql,conn,3,3
rs.delete
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect("baoming_search.asp")
%>
评论: 9 | 引用: 0 | 查看次数: 781
发表评论