j_declaredel.asp

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

<!--#include file="../include/Pubconn.asp"-->
  
<% 
 
 bz=request("bz") 
 dyear=request("dyear")
 dmonth=request("dmonth")
 dday=request("dday")
 eyear=request("eyear")
 emonth=request("emonth")
 eday=request("eday")
 stype=request("stype")
 currentpage=request("currentpage")
 
 if request.form("checkbox1").count<1 then
      response.Redirect("j_declaremain.asp?currentpage="+currentpage+"&bz="+bz+"&dyear="+dyear+"&dmonth="+dmonth+"&dday="+dday+"&eyear="+eyear+"&emonth="+emonth+"&eday="+eday+"&stype="+stype)
 else   
    for n=1 to request.form("checkbox1").count       
       
     '将对应的字段名值取出来       
      xh=request.form("checkbox1")(n)    
           
      pid=request("id"&xh)    
     ' response.write pid&"<br>"   
       sql="Delete  from j_tbldeclare 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="j_declaremain.asp?currentPage=<%=currentpage%>&bz=<%=bz%>&dyear=<%=dyear%>&dmonth=<%=dmonth%>&dday=<%=dday%>&eyear=<%=eyear%>&emonth=<%=emonth%>&eday=<%=eday%>&stype=<%=stype%>">返回</a>