求asp代码

ranranrain 2009-08-05 03:55:13
sqlserver,a表中有字段为time

time中数值为:
2009-7-31
2009-8-1
2009-8-2
2009-8-5
(主意;缺少3号和4号)
如何判断没有记录的那天,即显示出日期:

2009-8-3
2009-8-4
...全文
83 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
ranranrain 2009-08-06
  • 打赏
  • 举报
回复
thanks~
[Quote=引用 7 楼 lzp4881 的回复:]
你可以指定日期啊,照着格式稍改一下就行了
<%
d1="2008-12-1"'开始日期
d2=date()'结束日期,今天
d=dateDiff("d",d1,d2)'计算两个日期之间的天数
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&d1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&d1&","'如果没有记录就把此日期放入str
d1=dateadd("d",1,d1)'日期加一天
next
response.write str'输出没有记录的日期
%>
[/Quote]
ranranrain 2009-08-06
  • 打赏
  • 举报
回复
ok啦!(*^__^*) 嘻嘻……
[Quote=引用 7 楼 lzp4881 的回复:]
你可以指定日期啊,照着格式稍改一下就行了
<%
d1="2008-12-1"'开始日期
d2=date()'结束日期,今天
d=dateDiff("d",d1,d2)'计算两个日期之间的天数
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&d1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&d1&","'如果没有记录就把此日期放入str
d1=dateadd("d",1,d1)'日期加一天
next
response.write str'输出没有记录的日期
%>
[/Quote]
lzp4881 2009-08-06
  • 打赏
  • 举报
回复
你可以指定日期啊,照着格式稍改一下就行了
<%
d1="2008-12-1"'开始日期
d2=date()'结束日期,今天
d=dateDiff("d",d1,d2)'计算两个日期之间的天数
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&d1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&d1&","'如果没有记录就把此日期放入str
d1=dateadd("d",1,d1)'日期加一天
next
response.write str'输出没有记录的日期
%>
ranranrain 2009-08-06
  • 打赏
  • 举报
回复
我测试了下,有那么一点点小问题:
1.好像只能测试一个月之中的无记录日期,比如我从2008-1-14开始检测的话,会显示2009-1-14到2008-12-14之中无记录那天日期,如果从2009-1-1测试的话,那会显示2009-1-1到2009-1-31之中无记录那天日期。怎么回事??( ⊙o⊙ )
2.我想要从2008-12-1开始到当天的检测无记录日期。可会把未来的也会测试出来
麻烦您再指点我下~~~(*^__^*)
[Quote=引用 2 楼 lzp4881 的回复:]
<%
y=2009'定义年份
m=7'定义月份
d=Day(DateSerial(y,m+1,0))'计算m月的天数
date1=y&"-"&m&"-1"'生成第一天
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&date1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&date1&","'如果没有记录就把此日期放入str
date1=dateadd("d",1,date1)'日期加一天
next
response.write str'输出没有记录的日期
%>
[/Quote]
王者coco 2009-08-05
  • 打赏
  • 举报
回复
up
mailbao 2009-08-05
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 lzp4881 的回复:]
<%
y=2009'定义年份
m=7'定义月份
d=Day(DateSerial(y,m+1,0))'计算m月的天数
date1=y&"-"&m&"-1"'生成第一天
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&date1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&date1&","'如果没有记录就把此日期放入str
date1=dateadd("d",1,date1)'日期加一天
next
response.write str'输出没有记录的日期
%>
[/Quote]



這方法簡單可行!頂!!
lzp4881 2009-08-05
  • 打赏
  • 举报
回复
dim n : n = conn.execute("select count(*) from a where dateDiff(d,[time],'"&date1&"')=0")(0)'查询某一天是否有数据
这行改成你自己的表和字段
lzp4881 2009-08-05
  • 打赏
  • 举报
回复
<%
y=2009'定义年份
m=7'定义月份
d=Day(DateSerial(y,m+1,0))'计算m月的天数
date1=y&"-"&m&"-1"'生成第一天
for i=1 to d'循环天数
dim n : n = conn.execute("select count(*) from zd_user where dateDiff(d,lastlogintime,'"&date1&"')=0")(0)'查询某一天是否有数据
if n=0 then str=str&date1&","'如果没有记录就把此日期放入str
date1=dateadd("d",1,date1)'日期加一天
next
response.write str'输出没有记录的日期
%>
绿绦 2009-08-05
  • 打赏
  • 举报
回复
没有听懂你的意思呢?/

帮顶

绿绦工作室

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧