数据库表tongji 里面的时间是以 now()格式存放的  就是例如这样:2004-5-7 17:14:41
我设了两个DTPicker的控件,要统计
dim aa as data
dim bb as data
aa=DTPicker1.value
bb=DTPicker2.value
strsql="select sum(此次消费金额) from userXFinfo where 下机时间 between '"&aa&"' and '"&bb&"'"(后来换了>= 和<= 还是不行)这样对吗?我不明白的是DTPicker只是以yyyy-mm-dd存的,而我数据库里面的时间却有具体时间,这样会查询成功吗?
如果查询一天 一个星期 以及一个月的 收入情况如何办得到

解决方案 »

  1.   

    strsql="select sum(此次消费金额) from userXFinfo where 下机时间 between '"& format(aa,"YYYY-MM_DD") &"' and '"& format(bb,"YYYY-MM-DD") &"'"
      

  2.   

    "WHERE 下机时间 >='" & Format(dtp(0).Value, "yyyy-mm-dd") & " " & Format(dtp(1).Value, "hh:mm:ss") & "' AND 下机时间 <='" & Format(dtp(2).Value, "yyyy-mm-dd") & " " & Format(dtp(3).Value, "hh:mm:ss") & "'"
      

  3.   

    strsql="select sum(此次消费金额) from userXFinfo where 下机时间 between #"& format(aa,"YYYY-MM_DD") &"# and #"& format(bb,"YYYY-MM-DD") &"#"Accesss数据库中日期型应该用 # 号区分的
      

  4.   

    我用小健的好象不行啊~~ 提示是:标准表达式中数据类型不搭配..是什么意思Dim aa As Single
    strSQL = "select sum(此次消费金额) from userXFinfo where 下机时间>='" & Format(DTPicker1.Value, "yyyy-mm-dd") & " " & Format(DTPicker2.Value, "hh:mm:ss") & "' and 下机时间<='" & Format(DTPicker3.Value, "yyyy-mm-dd") & " " & Format(DTPicker4.Value, "hh:mm:ss") & "'"
    Set MyRs = Cnn.Execute(strSQL)
    aa = MyRs(0)
    Label3.Caption = "总的消费金额:" & str(aa)这样应该是正确的吧?
      

  5.   

    去掉那些 where的语句后就能显示就是~~~