安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

Access 语法错误(操作符丢失)在查询表达式 字段名 中 的解决办法

2017-08-27 15:52:00
zstmtony
原创
4005

帮客户做的一个Access数据库管理系统中,出现一个比较特别的错误

就是只要是数据表子窗体,使用内置的筛选功能,就是在字段右边的小箭头打开的筛选功能,都会提示以下错误:

Access 语法错误(操作符丢失)在查询表达式 字段名 中

Access Form - Syntax error (missing operator) in query expression





经过无数次的尝试,终于?#19994;?#21407;因

是因为字段名中包含有空格,而且空格后面的名称Code Name Number等都是Access的保留字

如果窗体绑定的数据源直接是表名: 如 tblTest, 则筛选正常

如果窗体绑定的数据源是查询,或SQL语句,如Select  * from tblTest ,则出错


我的第一想法是在查询中将 字段名前后加 [],但发?#32622;?#26377;任何作用


解决办法:

1.将字段名中的空格全部去掉,改成CompanyCode CompanyName 这样即可 (但如果 查询 窗体 代码已经做好了,再修改表,那工作量就太大了) 这种一般是软件设计初期可以采用。

2.如果不改字段名,将窗体中控件的控件源 的Company Code , 改为 [Company Code]

   注意,在查询或窗体数据源中改字段名 加  [ ] 没有用

  这种比第1种改动要小一点。   不过如果窗体比较多,窗体控件也比较多的话,这?#22336;?#27861;也是比较累的   


因为涉及的窗体太多,实在不想手工逐个来修改,所以做了一个小工具,用代码来批量替换


'将窗体中所有控件的控件源名称加上[ ],以解决字段名中包含空格带来的问题
Private Sub Command0_Click()
Dim frm As Form
Dim ctr As Control
Dim strFormName As String
strFormName = "frmFXEXT_Sub" '要替换控件源的窗体名称
DoCmd.OpenForm strFormName, acDesign, , , , acHidden '打开窗体到设计视图,且隐藏打开
Set frm = Forms(strFormName)
For Each ctr In frm.Section(acDetail).Controls '循环所有主体里的控件
If Not (TypeOf ctr Is Label) Then  '排除标签控件 (只处理文本框 组合框 列表框 复选框 多选项等控件)
If Left(ctr.ControlSource, 1) <> "[" Then  '如果控件源是[开对,就代表已经转换过了,就不再重复转换
ctr.ControlSource = "[" & ctr.ControlSource & "]" '没有转换的,就是字段名前后加上  [ ]
End If
End If
Next
DoCmd.Close acForm, frm.Name, acSaveYes  '保存窗体
End Sub


    分享
    ? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:19
    内存占用:7.75MB
    PHP 执行时间:0.16
    双色球大奖2000年
    安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假
    35选7走势图 快3开奖结果安徽 蛇和梯子彩金 惊喜猜猜乐图片 北京赛车pk10计划网 亚马逊的秘密返水 摔角传奇2 重庆时时彩开奖号码下载 德科钻石试玩 排列5历史开奖号码