asp实现的可以提醒生日的几种方法附代码_应用技巧_

asp生日自动提醒小程式 用ASP编写，调试通过，使用方便-asp birthday automatically remind small programs with the preparation of ASP, debug, easy to use
方法一：

最初写的一个用于班级网站的最近一个月同学生日的提醒小程序。虽然不怎么样，而且很乱，但是最起码是自己动脑筋去想的，所以我比较看重。ASP程序虽然有好多可以借鉴人家的。但是我想更多时候，我们应该在经典上有所突出，有所创新那不至于默守陈规而无永远只能做一个平凡的程序员。

<%
      dim     daydif
      dim     days '定义查询前后多少天内生日的同学,如60则查询前一个月后下一个月生日的同学名单。
      SQL="Select name,brithday from class "
            Set rs=server.CreateObject("ADODB.RecordSet")
            rs.Open SQL,con,1,1
            for i=1 to rs.recordcount     '读出所有的数据 
                    if rs.eof then exit for
                    daydif=abs(datediff("d",date,rs("birthday")) )mod 365
                    if daydif < days  
                          response.write rs("name")%> 
                          response.write "" 
                          response.write rs("birthday")&"、"
                    end if
                    rs.movenext
            loop 
            rs.Close
            Set rs=nothing
            %>

方法二：
<%
days1=split(date(),"-")
days2=split(DateAdd("d",5,date()),"-")
sql="select [id],Memberid,birthday from customers "
if days1(1)<>days2(1) then
sql=sql+" where (month(birthday) = '"&days1(1)&"' or month(birthday)='"&days2(1)&"')"
else
sql=sql+" where month(birthday) = '"&days1(1)&"'"
end if
sql=sql+" and day(birthday) between '"&days1(2)&"' and '"&days2(2)&"'"
'Response.Write(sql)
set conn=server.CreateObject("ADODB.connection")
conn.open connstr
set rs=Conn.execute(sql)
if not rs.eof then%>
 
window.onload = getMsg; 
window.onresize = resizeDiv; 
window.onerror = function(){} 
//短信提示使用(asilas添加) 
var divTop,divLeft,divWidth,divHeight,docHeight,docWidth,objTimer,i = 0; 
function getMsg() 
{ 
try{ 
divTop = parseInt(document.getElementById("eMeng").style.top,10) 
divLeft = parseInt(document.getElementById("eMeng").style.left,10) 
divHeight = parseInt(document.getElementById("eMeng").offsetHeight,10) 
divWidth = parseInt(document.getElementById("eMeng").offsetWidth,10) 
docWidth = document.body.clientWidth; 
docHeight = document.body.clientHeight; 
document.getElementById("eMeng").style.top = parseInt(document.body.scrollTop,10) + docHeight + 10;// divHeight 
document.getElementById("eMeng").style.left = parseInt(document.body.scrollLeft,10) + docWidth - divWidth 
document.getElementById("eMeng").style.visibility="visible" 
objTimer = window.setInterval("moveDiv()",10) 
} 
catch(e){} 
}
function resizeDiv() 
{ 
i+=1 
if(i>500) closeDiv() 
try{ 
divHeight = parseInt(document.getElementById("eMeng").offsetHeight,10) 
divWidth = parseInt(document.getElementById("eMeng").offsetWidth,10) 
docWidth = document.body.clientWidth; 
docHeight = document.body.clientHeight; 
document.getElementById("eMeng").style.top = docHeight - divHeight + parseInt(document.body.scrollTop,10) 
document.getElementById("eMeng").style.left = docWidth - divWidth + parseInt(document.body.scrollLeft,10) 
} 
catch(e){} 
}
function moveDiv() 
{ 
try 
{ 
if(parseInt(document.getElementById("eMeng").style.top,10) <= (docHeight - divHeight + parseInt(document.body.scrollTop,10))) 
{ 
window.clearInterval(objTimer) 
objTimer = window.setInterval("resizeDiv()",1) 
} 
divTop = parseInt(document.getElementById("eMeng").style.top,10) 
document.getElementById("eMeng").style.top = divTop - 1 
} 
catch(e){} 
} 
function closeDiv() 
{ 
document.getElementById('eMeng').style.visibility='hidden'; 
if(objTimer) window.clearInterval(objTimer) 
} 
 



      
      生日提示：
     × 
 

      近期将要过生日的会员有：

 
<%i=1
do while not rs.eof
Response.Write(""&rs(1)&"("&month(rs(2))&"-"&day(rs(2))&")  ")
if i mod 2 =0 then response.Write("
")
rs.movenext
i=i+1
loop%>