delnosubnumber.asp

来自「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 40 行

ASP
40 行
字号 
<!--#include file="conn.asp"-->
<%
if session("admin_rank")<>1 and session("admin_rank")<>3 then
response.write("<script>alert('您无权查看本页，SORRY！');window.location=('login.asp')</script>")
response.end
end if
%>
<%set rs=server.createobject("adodb.recordset")
yearfrom=request("yearfrom")
monthfrom=request("monthfrom")
dayfrom=request("dayfrom")
yearto=request("yearto")
monthto=request("monthto")
dayto=request("dayto")
OrderNumber=trim(request("OrderNumber"))
if len(yearfrom&"/"&monthfrom&"/"&dayfrom)<8 and len(yearto&"/"&monthto&"/"&dayto)<8 then%>
您选择的日期有错误,您重新选择!<a href="delpass.asp"><font color="#FF0000">返回</font></a><font color="#FF0000">!</font>
<%else%>
<% 
dnow=cdate(yearfrom&"/"&monthfrom&"/"&dayfrom)
tnow=cdate(yearto&"/"&monthto&"/"&dayto)
%>
 <%end if%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<%
tnow=dateadd("h",24,cdate(yearto&"/"&monthto&"/"&dayto))
if OrderNumber="" then
conn.execute("delete from sub where  sub_date <= #" & tnow & "# and sub_date >= #"& dnow & "#  and sub_payok = false")
else
conn.execute("delete from sub where sub_date <= #" & tnow & "# and sub_date >= #"& dnow & "#  and sub_payok = false and sub_number='"&ordernumber&"'")
end if

%>
<body style="background-color: #F0FBF1">
<p align="center"><font color="#FF0000">已完成删除了所有的无用订单号！</font></p>
<p align="center">　</p>

delnosubnumber.asp - 源码说明

本页面展示了「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测试」中的 delnosubnumber.asp 源码文件，采用 ASP 编程语言编写，共 40 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与MD5相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?