Access 語法錯誤(操作符丟失)在查詢錶達式 字段名 中 的解決辦法

2017-08-27 15:52:00
zstmtony
原創
6294

幫客戶做的一箇Access數據庫管理繫統中,齣現一箇比較特彆的錯誤

就是隻要是數據錶子窗體,使用內置的篩選功能,就是在字段右邊的小箭頭打開的篩選功能,都會提示以下錯誤:

Access 語法錯誤(操作符丟失)在查詢錶達式 字段名 中

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





經過無數次的嚐試,終於找到原因

是因爲字段名中包含有空格,而且空格後麵的名稱Code Name Number等都是Access的保留字

如果窗體綁定的數據源直接是錶名: 如 tblTest, 則篩選正常

如果窗體綁定的數據源是查詢,或SQL語句,如Select  * from tblTest ,則齣錯


我的第一想法是在查詢中將 字段名前後加 [],但髮現沒有任何作用


解決辦法:

1.將字段名中的空格全部去掉,改成CompanyCode CompanyName 這樣卽可 (但如果 查詢 窗體 代碼已經做好瞭,再修改錶,那工作量就太大瞭) 這種一般是軟件設計初期可以採用。

2.如果不改字段名,將窗體中控件的控件源 的Company Code , 改爲 [Company Code]

   註意,在查詢或窗體數據源中改字段名 加  [ ] 沒有用

  這種比第1種改動要小一點。   不過如果窗體比較多,窗體控件也比較多的話,這種方法也是比較纍的   


因爲涉及的窗體太多,實在不想手工逐箇來修改,所以做瞭一箇小工具,用代碼來批量替換


'將窗體中所有控件的控件源名稱加上[ ],以解決字段名中包含空格帶來的問題
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


    分享