📄 baojin2.asp
字号:
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 简单WEB进销存管理系统 V2.1 ☆
'★ ★
'☆ 版权所有: cnshitou.cn ☆
'★ ★
'☆ 程序制作: 石头网络 ☆
'★ email:chinashiwei007@yahoo.com.cn ★
'☆ QQ:365167311 ☆
'★ ★
'☆ ☆
'★ 主页地址: http://www.cnshitou.cn/ 石头网络及产品 ★
'☆ http://www.cnshitou.cn/avonjxc/ 演示地址 ☆
'★ ★
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
%>
<%
if request.Cookies("shiwei_username")="" then
response.Redirect "login.asp"
end if
%>
<!-- #include file="conn.asp" -->
<!-- #include file="const.asp" -->
<!-- #include file="inc/function.asp" -->
<html>
<head>
<title>会员生日提醒</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style/style.css" rel="stylesheet" type="text/css">
<style>
body {
background-color:#FFFFFF;
}
</style>
</HEAD>
<BODY>
<%
if request("hid")="ok" then
conn.execute("update huiyuan set wenhou=#"&date()&"# where id="&request("id"))
end if
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#C4D8ED">
<tr>
<td><img src="images/r_1.gif" alt="" /></td>
<td width="100%" background="images/r_0.gif">
<table cellpadding="0" cellspacing="0" width="100%">
<tr>
<td> 会员生日提醒</td>
<td align="right"> </td>
</tr>
</table>
</td>
<td><img src="images/r_2.gif" alt="" /></td>
</tr>
<tr>
<td></td>
<td>
<table align="center" cellpadding="4" cellspacing="1" class="toptable grid" border="1" width="100%">
<tr align="center">
<td class="category" height="30">会员姓名</td>
<td class="category">会员卡号</td>
<td class="category">电话</td>
<td class="category">住址</td>
<td class="category">生日</td>
<td class="category">操作</td>
</tr>
<%
sql="select * from huiyuan where ((month(shenri)>="&month(date())&" and month(shenri)<="&month(date()+tiqian)&") and (day(shenri)>="&day(date())&" and day(shenri)<="&day(date()+tiqian)&") and year(wenhou)<>"&year(date())&" and yinyan='阳') or ((month(shenri)>="&WDateToEDate(now(),"1")&" and month(shenri)<="&WDateToEDate(now()+tiqian,"1")&") and (day(shenri)>="&WDateToEDate(now(),"2")&" and day(shenri)<="&WDateToEDate(now()+tiqian,"2")&") and year(wenhou)<>"&year(date())&" and yinyan='阴')"
'sql="select * from huiyuan where (datediff('y','"&date()&"',shenri)>=0 and datediff('y','"&date()+tiqian&"',shenri)<=0 and yinyan='阳') or (datediff('y','"&WDateToEDate(now(),"1")&"',shenri)>=0 and datediff('y','"&WDateToEDate(now(),"1")+tiqian&"',shenri)<=0 and yinyan='阴')"
set rs=conn.execute(sql)
do while rs.eof=false
%>
<tr onMouseOver="this.className='highlight'" onMouseOut="this.className=''">
<td align=center height=25><%=rs("username")%></td>
<td align=center><%=rs("card")%></td>
<td align=center><%=rs("tel")%></td>
<td align=center><%=rs("address")%></td>
<td align=center><%=rs("shenri")%> (<%=rs("yinyan")%>)</td>
<td align=center><input type=button value='已经问候,取消提醒' onclick=window.location.href='?hid=ok&id=<%=rs("id")%>' class="button"></td>
</tr>
<%
nowbaojin2=nowbaojin2&"ok"
rs.movenext
loop
%>
<%if nowbaojin2="" then%>
<tr onMouseOver="this.className='highlight'" onMouseOut="this.className=''">
<td align=center height=25 colspan="6" style="color:#ff0000">今天没有会员生日</td>
</tr>
<%end if%>
</table>
</td>
<td></td>
</tr>
<tr>
<td><img src="images/r_4.gif" alt="" /></td>
<td></td>
<td><img src="images/r_3.gif" alt="" /></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -