求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
...全文
131 9 打赏 收藏 转发到动态 举报
AI 作业
写回复
用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
  • 打赏
  • 举报
回复
没有听懂你的意思呢?/

帮顶

绿绦工作室
ASP.NET开发典型模块大全(修订版)》以关键技术和热点技术为核心,通过27个典型模块和5章热点技术,全面地介绍了如何使用asp.net进行各领域的web项目开发。全书共3篇分为32章,第1篇关键模块篇,覆盖网站开发的关键领域,内容涉及论坛、博客、播客、网络硬盘、电子邮件、在线考试、网站备忘录、在线短消息、网站访问量统计与分析、系统后台管理权限分配等网站关键模块;第2篇常见模块篇,覆盖网站开发的各个领域,内容涉及网站会员注册及登录、会员密码找回、留言本、上传与下载、图片资源管理、搜索引擎、网上问卷调查、rss在线订阅、聊天室、购物车、在线银行支付、手机短消息管理、在线音乐、投票系统、万能打印、数据自动备份与恢复等常见模块;第3篇热点技术应用篇,解决网站开发在某个领域遇到的技术难题,内容涉及linq数据访问技术、安全技术、服务技术、ajax、高级应用技术等。 《ASP.NET开发典型模块大全(修订版)》附有配套光盘。光盘提供了书中所有案例的全部源代码,并经过精心调试,在windows xp和windows 2000下全部通过,保证能够正常运行。此外,光盘中还提供有编程词典试用版软件。 《ASP.NET开发典型模块大全(修订版)》案例涉及领域广泛,实用性非常强。学习本书读者可以了解各个领域的特点,能够针对某一行业进行软件开发,也可以通过光盘中提供的模块源代码进行二次开发,以减少开发系统所需要的时间。本书适合各级软件开发人员学习使用,也可供大、中专院校师生学习参考。

28,409

社区成员

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

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