哪位ASP高手帮我看看这段代码?很简单的!
会员生日提醒代码!出了点错……表:user列:name,userinfouserinfo:email|homepage|1983-09-13|qq<!--#include...
会员生日提醒代码!出了点错……
表:user
列:name,userinfo
userinfo:
email|homepage|1983-09-13|qq
<!--#include file="conn.asp"-->
<%
dim ym,yd,nm,nd
set rs=conn.execute("select name,userinfo from [user] where del=0")
if rs.eof then
rs.movenext
else
userinfo=rs("userinfo")
userinfo=split(userinfo,"|")
ym=month("userinfo(2)")
yd=day("userinfo(2)")
nm=month("now")
nd=day("now")
if ym=nm and yd=nd then
response.write"今天是"&name&"的生日"
else
response.write"今天没有人生日"
rs.movenext
end if
end if
rs.close
set rs=nothing
%> 展开
表:user
列:name,userinfo
userinfo:
email|homepage|1983-09-13|qq
<!--#include file="conn.asp"-->
<%
dim ym,yd,nm,nd
set rs=conn.execute("select name,userinfo from [user] where del=0")
if rs.eof then
rs.movenext
else
userinfo=rs("userinfo")
userinfo=split(userinfo,"|")
ym=month("userinfo(2)")
yd=day("userinfo(2)")
nm=month("now")
nd=day("now")
if ym=nm and yd=nd then
response.write"今天是"&name&"的生日"
else
response.write"今天没有人生日"
rs.movenext
end if
end if
rs.close
set rs=nothing
%> 展开
展开全部
我改给你看
<!--#include file="conn.asp"-->
<%
dim ym,yd,nm,nd
set rs=conn.execute("select name,userinfo from [user] where del=0")
if not rs.eof then
do while not rs.eof
userinfo=rs("userinfo")
userinfo=split(userinfo,"|")
ym=month(userinfo(2))
yd=day(userinfo(2))
nm=month(now())
nd=day(now())
if ym=nm and yd=nd then
response.write"今天是"&rs("name")&"的生日"
rs.movenext
loop
else
response.write"今天没有人生日"
end if
end if
rs.close
set rs=nothing
%>
<!--#include file="conn.asp"-->
<%
dim ym,yd,nm,nd
set rs=conn.execute("select name,userinfo from [user] where del=0")
if not rs.eof then
do while not rs.eof
userinfo=rs("userinfo")
userinfo=split(userinfo,"|")
ym=month(userinfo(2))
yd=day(userinfo(2))
nm=month(now())
nd=day(now())
if ym=nm and yd=nd then
response.write"今天是"&rs("name")&"的生日"
rs.movenext
loop
else
response.write"今天没有人生日"
end if
end if
rs.close
set rs=nothing
%>
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询