del.asp

来自「房产中介信息管理 房产中介信息管理」· ASP 代码 · 共 10 行

<% xDb_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("database\mzzj.mdb") & ";"
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str %>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="delete from mzinfo where id="&request("id")&""
Set Rs=conn.execute(sql)
response.Redirect("show.asp")

%>