| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 1136 人关注过本帖
标题:VB总出现操作符丢失问题
只看楼主 加入收藏
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
结帖率:100%
收藏
 问题点数:0 回复次数:7 
VB总出现操作符丢失问题
Dim db As Database
'Dim sql As String
Set db = OpenDatabase(App.Path & "\dk.mdb")
sql = "update aa1 set aa1.职称=aa.职称 from aa where aa1.姓名=aa.姓名"
db.Execute sql

在VB中,运行上面这段代码时,系统提示“操作符丢失,在查询表达中”,怎么解决?谢谢
搜索更多相关主题的帖子: update where 姓名 职称 
2016-11-08 22:52
xss_wl
Rank: 5Rank: 5
等 级:禁止访问
威 望:3
帖 子:100
专家分:315
注 册:2016-10-15
收藏
得分:0 
楼主的代码一看就知道使用的是DAO对象来操作数据库,由于对你的表结构以及各表的字段等信息不清楚,无法为你提供帮助。请你补充相关信息后再行询问。
2016-11-09 11:45
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
收藏
得分:0 
Set td = db.CreateTableDef(mtable)
With td
     .Fields.Append .CreateField("编号", dbInteger, 3)
     .Fields.Append .CreateField("姓名", dbText, 8)
     .Fields.Append .CreateField("职称", dbText, 6)
end sub
2016-11-09 13:04
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
收藏
得分:0 
Set td = db.CreateTableDef(mtable)
With td
     .Fields.Append .CreateField("编号", dbInteger, 3)
     .Fields.Append .CreateField("姓名", dbText, 8)
     .Fields.Append .CreateField("职称", dbText, 6)
end sub
aa表和aa1表结构都是如上面所示。谢谢
2016-11-09 13:05
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
收藏
得分:0 
Set td = db.CreateTableDef(mtable)
With td
     .Fields.Append .CreateField("编号", dbInteger, 3)
     .Fields.Append .CreateField("姓名", dbText, 8)
     .Fields.Append .CreateField("职称", dbText, 6)
end with
aa表和aa1表结构都是如上面所示。谢谢
2016-11-09 13:06
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
收藏
得分:0 
Private Sub Command1_Click()
Dim db As Database
Set db = OpenDatabase(App.Path + "\db.mdb")
Sql = "update aa1 set aa1.职称=aa.职称 from aa1,aa where aa1.姓名=aa.姓名"
db.Execute Sql
End Sub

你好,两个表中都有数据,只是把aa1中的职称数据更新为aa中的职称,运行后,但aa.姓名是空的,而且aa.职称是空的,所以会出现操作符丢失,在查询表达式中,但我不知道怎么解决,请教高手。谢谢!

两个表中的表结构如下:
Set td = db.CreateTableDef(mtable)
With td
     .Fields.Append .CreateField("编号", dbInteger, 3)
     .Fields.Append .CreateField("姓名", dbText, 8)
     .Fields.Append .CreateField("职称", dbText, 6)
end with
2016-11-09 13:18
xss_wl
Rank: 5Rank: 5
等 级:禁止访问
威 望:3
帖 子:100
专家分:315
注 册:2016-10-15
收藏
得分:0 
有时间再给你解决,目前项目缠身,暂时没办法给你解决,请稍安勿燥。
2016-11-10 16:52
guixm1998
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2016-11-8
收藏
得分:0 
我自己已经解决了。
2016-11-11 23:33
快速回复:VB总出现操作符丢失问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.072737 second(s), 9 queries.
Copyright©2004-2020, BCCN.NET, All Rights Reserved