急啊,邦忙

okcat 2004-08-23 10:09:43
Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\VB临时文件夹\产品关系表.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "产品表"
Adodc1.Recordset.Find "钢种='wang'" '报错处  报错信息:对象变量或                                           With块变量未                                          定义
Adodc1.Recordset.Fields("甲班1#机当日累计") = Str(1)
Adodc1.Recordset.Fields("甲班1#机合计") = Str(2)
Adodc1.Recordset.Fields("甲班1#机钢铸浇坯数") = Str(3)
End Sub

为身摸要报错???????急啊,为什么啊,邦邦忙啊
...全文
50 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Andy__Huang 2004-08-23
是不是已經
Adodc1.Recordset.eof=true ?
回复
okcat 2004-08-23
不是啊,是 Adodc1.Recordset.Find "钢种='wang'" 出错了。
为什么?
回复
online 2004-08-23
Adodc1.RecordSource = "产品表"
Adodc1.Refresh
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2004-08-23 10:09
社区公告
暂无公告