del.asp

房产中介信息管理 房产中介信息管理

<% 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")

%>