El principio del recordatorio de cumpleaños de ASP es generalmente comparar la fecha de nacimiento del usuario con la fecha actual. Si son menos de unos pocos días, se mostrará el recordatorio. Los siguientes son varios métodos para implementar el subprograma de recordatorio de cumpleaños de ASP. escrito en ASP, aprobado por depuración y fácil de usar: el cumpleaños de asp recuerda automáticamente a los programas pequeños con la preparación de ASP, depuración, fácil de usar
Método uno:
Un pequeño programa escrito originalmente para su uso en el sitio web de la clase para recordar a los compañeros sus cumpleaños del mes pasado. Aunque no es muy bueno y es muy complicado, al menos es algo en lo que usé mi propio cerebro para pensar, así que lo valoro más. Aunque existen muchos programas ASP que se pueden aprender de otros. Pero creo que más a menudo deberíamos diferenciarnos de los clásicos e innovar, para no apegarnos a las viejas reglas y ser sólo un programador común y corriente para siempre.
<%
día oscuro
días oscuros 'define el número de días antes y después de consultar a los estudiantes cuyos cumpleaños están dentro. Por ejemplo, 60 consulta la lista de estudiantes cuyos cumpleaños son el mes siguiente al mes anterior.
SQL=Seleccione nombre, cumpleaños de la clase
Establecer rs=servidor.CreateObject(ADODB.RecordSet)
rs.Abrir SQL,con,1,1
para i=1 a rs.recordcount 'Leer todos los datos
si rs.eof entonces salga por
daydif=abs(datediff(d,fecha,rs(cumpleaños)) )mod 365
si diadif < dias
respuesta.escribir rs(nombre)%>
respuesta.escribir <color de fuente=#FF0000>
respuesta.escribir rs(cumpleaños)&、</font>
terminar si
rs.movenext
bucle
rs.Cerrar
Establecer rs = nada
%>
Método dos:
<%
días1=dividir(fecha(),-)
días2=dividir(FechaAgregar(d,5,fecha()),-)
sql=select [id],ID de miembro,cumpleaños de los clientes
si días1(1)<>días2(1) entonces
sql=sql+ donde (mes(cumpleaños) = '&días1(1)&' o mes(cumpleaños)='&días2(1)&')
demás
sql=sql+ donde mes(cumpleaños) = '&días1(1)&'
terminar si
sql=sql+ y día(cumpleaños) entre '&días1(2)&' y '&días2(2)&'
'Respuesta.Escribir(sql)
establecer conexión=servidor.CreateObject(ADODB.conexión)
conn.open connstr
establecer rs=Conn.execute(sql)
si no rs.eof entonces%>
<lenguaje de escritura=JavaScript>
ventana.onload = getMsg;
ventana.onresize = resizeDiv;
ventana.onerror = función(){}
//Uso de recordatorio por SMS (agregado por asilas)
var divTop,divLeft,divWidth,divHeight,docHeight,docWidth,objTimer,i = 0;
función obtener mensaje()
{
intentar{
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 = documento.body.clientWidth;
docHeight = documento.cuerpo.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 = ventana.setInterval(moveDiv(),10)
}
captura(e){}
}
función cambiar tamañoDiv()
{
yo+=1
si(i>500) cerrarDiv()
intentar{
divHeight = parseInt(document.getElementById(eMeng).offsetHeight,10)
divWidth = parseInt(document.getElementById(eMeng).offsetWidth,10)
docWidth = documento.body.clientWidth;
docHeight = documento.cuerpo.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)
}
captura(e){}
}
función moverDiv()
{
intentar
{
if(parseInt(document.getElementById(eMeng).style.top,10) <= (docHeight - divHeight + parseInt(document.body.scrollTop,10)))
{
ventana.clearInterval(objTimer)
objTimer = ventana.setInterval(resizeDiv(),1)
}
divTop = parseInt(document.getElementById(eMeng).style.top,10)
document.getElementById(eMeng).style.top = divTop - 1
}
captura(e){}
}
función cerrarDiv()
{
document.getElementById('eMeng').style.visibility='hidden';
si(objTimer) ventana.clearInterval(objTimer)
}
</script>
<DIV id=eMeng style='BORDE-DERECHO: #455690 1px sólido; BORDE-IZQUIERDO: #a6b4cf 1px sólido; : 180px; BORDE INFERIOR: #455690 1px sólido; POSICIÓN: absoluta; SUPERIOR: 0px; ALTURA: 116px; COLOR DE FONDO: #c9d3f3'>
<TABLE style='BORDER-TOP: #ffffff 1px sólido; BORDER-LEFT: #ffffff 1px sólido' cellSpacing=0 cellPadding=0 width='100%' bgColor=#cfdef4 border=0><TBODY>
<TR>
<TD style='TAMAÑO DE FUENTE: 12px; IMAGEN DE FONDO: url(msgTopBg.gif); COLOR: #0f2c8c' ancho=30 alto=24></TD>
<TD style='PESO DE FUENTE: normal; TAMAÑO DE FUENTE: 12px; IMAGEN DE FONDO: url(msgTopBg.gif); COLOR: #1f336b PADDING-TOP: 4px;PADDING-left: 4px' vAlign=center width= '100%'>Recordatorio de cumpleaños:</TD>
<TD style='IMAGEN DE FONDO: url(msgTopBg.gif PADDING-TOP: 2px;PADDING-right:2px' vAlign=center align=right width=19><span /></TR>
<TR>
<TD style='PADDING-RIGHT: 1px; BACKGROUND-IMAGE: url(1msgBottomBg.jpg); PADDING-BOTTOM: 1px' colSpan=3 height=90> <DIV style='BORDER-RIGHT: #b9c9ef 1px solid; -DERECHA: 13px; BORDE SUPERIOR: #728eb8 1px sólido; RELLENO IZQUIERDO: 13px; TAMAÑO DE FUENTE: 12px; RELLENO INFERIOR: 13px; #b9c9ef 1px; solid HEIGHT: 100%'>Los miembros que cumplirán años en el futuro cercano son:<BR><BR> <DIV align=center style='word-break:break-all'>
<%i=1
hacer mientras no rs.eof
Response.Write(<a href='/System/AdmMember/Edit.asp?id=&rs(0)&' />si mod 2 =0 entonces Response.Write(</br>)
rs.movenext
yo=yo+1
bucle%></DIV></DIV> </TD>
</TR>
</TBODY>
</TABLA>
</DIV>
<% final si
rs.cerrar
establecer rs = nada
conexión.cerrar()
establecer conexión=nada %>
Método tres:
servidor sql:
<%
Si mes(Ahora())=12 y día(ahora())>24 Entonces
sSql = seleccione FoodID, Strname, TimeID de Tfood donde ( dateiff(d,getdate(),dateadd(year,datediff(Year,TimeID,GetDate()),TimeID))<=200 y dateiff(d,getdate(), dateadd(año,dateiff(Año,TimeID,GetDate()),TimeID))>=0 ) O ( dateiff(d,getdate(),dateadd(año,datediff(Año,TimeID,GetDate())+1,TimeID))<=200 y dateiff(d,getdate(),dateadd(año,datediff(Año,TimeID, ObtenerFecha())+1,IDHora))>=0 )
Demás
sSql = seleccione FoodID, Strname, TimeID de Tfood donde ( dateiff(d,getdate(),dateadd(year,datediff(Year,TimeID,GetDate()),TimeID))<=200 y dateiff(d,getdate(), dateadd(año,dateiff(Año,HoraID,GetDate()),HoraID))>=0)
Terminar si
%>
Acceso:
<%
Si mes(Ahora())=12 y día(ahora())>24 Entonces
SQL = SELECCIONAR *
DE clientes
DONDE ( dateiff('d',date(),dateadd('yyyy',datediff('yyyy',Cumpleaños,date()),Cumpleaños))<=5 y dateiff('d',date(),dateadd( 'yyyy',datediff('yyyy',Cumpleaños,fecha()),Cumpleaños))>=0 ) O ( dateiff('d',date(),dateadd('yyyy',datediff('yyyy',Cumpleaños,date())+1,Cumpleaños))<=5 y dateiff('d',date(),dateadd( 'yyyy',datediff('yyyy',Cumpleaños,fecha())+1,Cumpleaños))>=0);
Demás
SQL = SELECCIONAR *
DE clientes
DONDE (DateDiff('d',date(),DateAdd('yyyy',DateDiff('yyyy',[Cumpleaños],fecha()),[Cumpleaños]))<=5 Y DateDiff('d',date(),DateAdd('yyyy',DateDiff('yyyy',[Cumpleaños],fecha()),[Cumpleaños]))>=0);
Terminar si
%>