您现在的位置:计算机技术学习网 > 技术中心 > WEB编程 > ASP >

判断星期,自动把上周的累计数据归到上周字段,本周初始化

来源:未知 责任编辑:智问网络 发表时间:2013-11-12 17:19 点击:
以下是代码片段:
ASP/Visual Basic代码
<%   
--判断星期,自动把上周的累计数据归到上周字段,本周初始化   
Dim Np,Lp,Lh   
-- Lp为上次访问时间   
Np = "108"  
Lp = "0"  
Lh = "2007-9-15 10:27:15"  
--如果两个时间相差不足一周,则计入本周累计   
If DateDiff("Ww", Lh, Now) <= 0 Then  
    Response.Write "Np = " & Np+1 & "<br>"  
    Response.Write "Lp = " & Lp   
--如果两个时间相差正好一周,则写入上周,本周初始化为1   
ElseIf DateDiff("Ww", Lh, Now) = 1 Then  
    Response.Write "Np = 1 <br>"  
    Response.Write "Lp = " & Np   
--如果两个时间相差大于一周,则上周清为0,本周初始化为1   
Else  
    Response.Write "Np = 1 <br>"  
    Response.Write "Lp = 0"    
End If  
  
Response.Write "<br><br>距上次访问相差" & DateDiff("Ww", Lh, Now) & "周."  
%> 
    发表评论
    请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
    用户名: 验证码:点击我更换图片
    最新评论 更多>>

    推荐热点

    • WAP常见问题问答大全(四)
    • ASP开发必备:WEB打印代码大全
    • ASP调用系统ping命令
    • asp缓存技术
    • ASP教程:第三篇 ASP基础
    • 用ASP+XML打造留言本(4)
    • 关于ASP Recordset 分页出现负数解决方法及建议
    • 用asp怎样编写文档搜索页面(5)
    • ASP处理多关键词查询实例代码
    网站首页 - 友情链接 - 网站地图 - TAG标签 - RSS订阅 - 内容搜索
    Copyright © 2008-2015 计算机技术学习交流网. 版权所有

    豫ICP备11007008号-1