VB中ADO控件怎么用日期进行查询啊?
这是我写的代码:PrivateSubCCX_Click()Dimtime1,time2AsDateDimsqlAsStringtime1=DTP1.Valuetime2=...
这是我写的代码:
Private Sub CCX_Click()
Dim time1, time2 As Date
Dim sql As String
time1 = DTP1.Value
time2 = DTP2.Value
sql = "select * from 班费使用记录 where 日期>=""" & time1 & """and 日期<=""" & time2 & """"
Ado.Recordset.Close
Ado.Recordset.Open sql
End Sub
其中,DTP1和DTP2是DTPicker控件,ADO控件是直接访问“仪表维护班各项公款记录.mdb”文件的。
运行后,它老说我FORM子句语法错误。我错在哪了? 展开
Private Sub CCX_Click()
Dim time1, time2 As Date
Dim sql As String
time1 = DTP1.Value
time2 = DTP2.Value
sql = "select * from 班费使用记录 where 日期>=""" & time1 & """and 日期<=""" & time2 & """"
Ado.Recordset.Close
Ado.Recordset.Open sql
End Sub
其中,DTP1和DTP2是DTPicker控件,ADO控件是直接访问“仪表维护班各项公款记录.mdb”文件的。
运行后,它老说我FORM子句语法错误。我错在哪了? 展开
2007-02-06
展开全部
"select * from 班费使用记录 where 日期>='" & time1 & "'and 日期<='" & time2 & "'"
或者
"select * from 班费使用记录 where 日期 between '" & time1 & "'and '" & time2 & "'"
下楼:“如果日期字段定义为时间类型的,则应将单引号改用#号来标识”
是针对ACCESS数据库的啊!
或者
"select * from 班费使用记录 where 日期 between '" & time1 & "'and '" & time2 & "'"
下楼:“如果日期字段定义为时间类型的,则应将单引号改用#号来标识”
是针对ACCESS数据库的啊!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询