delelist.asp

一个功能强大的黄页查询系统

<!--#include file="dbpath/dbpath.asp"-->
<%
if request.cookies("okadmin")="" then
  response.redirect "login.asp"
end if
   dim delesql
   dim useridtxt
   dim pagetxt
   useridtxt = Request("userid")
   pagetxt = Request("page")
   lbidtxt=request("lbid")
   delesql="DELETE FROM gq WHERE id=" & useridtxt
   conn.Execute delesql
   set conn=nothing
   response.redirect "glgq860.asp?page="& pagetxt &"&lbid="&lbidtxt
%>