dim sSQL as string
dim rds as ADODB.Recordset
sSQL = "Select * from 维修记录表 where 返还日期 <= #" & Format(Date, "yyyy-mm-dd") & "#"
Set rds = New ADODB.Recordset
rds.Open Trim$(sSQL), cnn, adOpenKeyset, adLockOptimistic其中,cnn 是已经打开的连接。执行的时候出错说“至少有一个参数没有被指定值”。
我想是where 子句的格式错了,但改了许多遍还是不成功。劳烦大家帮我看看问题出在哪,谢谢拉!
注:返还日期的格式是ACCESS中的短格式,如2004-7-12,而不是2004-07-12
dim rds as ADODB.Recordset
sSQL = "Select * from 维修记录表 where 返还日期 <= #" & Format(Date, "yyyy-mm-dd") & "#"
Set rds = New ADODB.Recordset
rds.Open Trim$(sSQL), cnn, adOpenKeyset, adLockOptimistic其中,cnn 是已经打开的连接。执行的时候出错说“至少有一个参数没有被指定值”。
我想是where 子句的格式错了,但改了许多遍还是不成功。劳烦大家帮我看看问题出在哪,谢谢拉!
注:返还日期的格式是ACCESS中的短格式,如2004-7-12,而不是2004-07-12
解决方案 »
- 大家又没遇到过:程序在任务管理器里显示占cpu50%,然后就死掉不动了?一般要怎么避免呢?
- 我的VB6工程里怎么用不了ERR对象?
- 【注】因为结帖,所以散分,请版主勿删,至少看一下内容嘛:)
- vb安装文件问题
- 关于局域网内防火墙代理权限的问题
- 各位大侠国庆好。100分求两个子程序。做过数据库的请进
- 全xp风格的界面,大家快来看看吧
- 使用msflexGrid控件出现的问题,高手进来看看
- 怎么获取会员的生日
- 请教ListView怎样改变每一列宽度?
- 既然vb不支持继承,那么当两个窗体的代码雷同的情况下, 启不是会造成代码的极大冗余,而且代码的可复用性也很差??
- 一个关于crystl report的问题
两种没有问题
sSQL = "Select * from 维修记录表 where 返还日期 <= #" & Format(Date, "yyyy-mm-dd") & "#"
sSQL = "Select * from 维修记录表 where 返还日期 <= #" & Date & "#"返还日期的格式是ACCESS中的短格式,如2004-7-12,而不是
短格式默认的是2004-07-12,不知你的咋会是2004-7-12????