d_linkmandel.asp

来自「一个很好的在线购物系统」· ASP 代码 · 共 48 行

<!--#include file="../include/Pubconn.asp"-->
  <%
 '*********************************
 '
 'Author:Ruphi  Update Time:2001-10-13
 '功能：计划活动中多个删除，当未选择一条记录时， 不进行删除操作
 '
 '*************************************
 
 

%>
<%

if request.form("xz").count<1 then
   response.Redirect("D_LinkManbrow.asp")
   response.end

else
    for n=1 to request.form("xz").count    
    
         '将对应的字段名值取出来    
         xh=request.form("xz")(n)   
         pid=request("lxrID"&xh) 
       '  response.write pid
         sql="Delete  from D_LinkMan where ID="&cint(pid)
         Pubconn.execute(sql)
    next    
  
end if
%>
                                   
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title></title><link href="cread.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" >
 
<p align="center">
 
成功删除！<a  href="D_LinkManbrow.asp">返回</a>