Option Explicit
Dim dt1 As Date
Dim dt2 As Date
dt1 = Date + #8:15:00 AM#
dt2 = Date + #8:45:00 AM#
If DataEnvironment1.rsCommand1.State <> adStateClosed Then
DataEnvironment1.rsCommand1.Close
End If
DataEnvironment1.Commands("Command1").Parameters(0) = dt1
DataEnvironment1.Commands("Command1").Parameters(1) = dt2 数据环境中有一个command1 sql语句为select sum(a) as a from 表1 where 时间 between ? and ?
窗体中有一个textbox,在其中显示sql语句的执行结果,可是执行后没有结果,为什么?请各位指教
Dim dt1 As Date
Dim dt2 As Date
dt1 = Date + #8:15:00 AM#
dt2 = Date + #8:45:00 AM#
If DataEnvironment1.rsCommand1.State <> adStateClosed Then
DataEnvironment1.rsCommand1.Close
End If
DataEnvironment1.Commands("Command1").Parameters(0) = dt1
DataEnvironment1.Commands("Command1").Parameters(1) = dt2 数据环境中有一个command1 sql语句为select sum(a) as a from 表1 where 时间 between ? and ?
窗体中有一个textbox,在其中显示sql语句的执行结果,可是执行后没有结果,为什么?请各位指教
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货