奥运专题:欢迎

zhjsdy 2004-08-16 08:56:05
我的程序每1小时执行1次,可是我的数据没有刷新,是怎回事?请各位大侠指教!
以下是1段从数据库中提数据的语句:
Set db = OpenDatabase("", True, False, "ODBC;DSN=elementinfo;UID=sa;PWD=;login timeout=5")
Set rs = db.OpenRecordset("select * from tabTimeData where StationNum='53463' and ObservTimes like " & "'%" & md & "%' ")‘ObservTimes观测时间=随时变化的当前时间md

//ObservTimes(观测时间)字段就是从表中的索引,
md 就是我取的时间变量,是这样得到的:
rr = Str(Format(Now, "yyyymmdd"))
tt = Format(Now, "hh")
md = Trim(rr) & Trim(tt)
...全文
106 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhjsdy 2004-08-16
  • 打赏
  • 举报
回复
为啥运行时提示“为找到方法和数据成员”??指向rs.state
haohaohappy 2004-08-16
  • 打赏
  • 举报
回复
改一下
Set rs = db.OpenRecordset("select * from tabTimeData where StationNum='53463' and ObservTimes like " & "'#" & md & "#' ")
另外更新要这样
if rs.state<>adstateclosed then rs.close
set rs=nothing
zhjsdy 2004-08-16
  • 打赏
  • 举报
回复
我正在测试,数据没有更新,那些语句没问题吧?
bluesky23 2004-08-16
  • 打赏
  • 举报
回复
呵呵,照楼上的方法可以试试
yassee 2004-08-16
  • 打赏
  • 举报
回复
加上
rs.close
set rs=nothing
lxxldd 2004-08-16
  • 打赏
  • 举报
回复
迎奥运

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧