📄 xzqx.asp

📁 一个很好的在线购物系统

💻 ASP

字号:

<!--#include file="../include/Pubconn.asp"-->

<%
ddbh=request("ddbh") 
dyear=request("dyear")
syear=request("syear")
syears=split(syear,",")
bz=request("bz")

'response.bz


for i=1 to 5
if request("sc"&i)="on" then
xz="1"
syear=trim(request("syear"&i))
xsbm=trim(request("xsbm"&i))

sql="delete from f_aimdepart where year='"&syear&"' and departcode='"&xsbm&"'"
'response.write sql
'response.end
Pubconn.execute(sql)
end if
next

  %>
<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">
<%if xz="1" then
%>
<p align="center">删除完毕
 <%else%> </p>
<p align="center"><font size="2"> 请选择记录!</font>
<%end if%>    
<p align="center">    
<br> 
<%if bz="" then%>
<a href="cscx.asp?bz=<%=bz%>"><font size="2">返 回</font></a>           
    <%else%>
<a href="cscx.asp?bz=<%=bz%>&ddbh=<%=ddbh%>&amp;dyear=<%=dyear%>"><font size="2">返 回</font></a>           
<%end if%>
 </p>
 <p align="center">
     
     
    
 </p> 
</body>   
   
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -