delete_news.asp

来自「我的小网站个人利用业余时间设计的」· ASP 代码 · 共 15 行

<% 
dim conn,path,fmem_name
      fmem_name=request.form("title") 
      response.write(fmem_name)
Set conn= Server.CreateObject("ADODB.Connection")
path=Server.MapPath("AnswerData.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&path
Sql="delete from news where title='"&fmem_name&"'"
			      set sqll=conn.Execute(Sql)
                              conn.close
			      set conn=nothing
                                response.redirect("delete_news.asp")
%>