delelist.asp

来自「娱乐A视网企业黄页程序 1.首页 index.asp 2.管理页 login」· ASP 代码 · 共 17 行

<!--#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
%>