Dim Filter As String
With e.Form.Controls("用户名")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "convert(varchar,Name) like '%" & .Value & "%'"
End If
End With
With e.Form.Controls("授权")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "convert(varchar,Group) like '%" & .Value & "%'"
End If
End With
If e.Form.Controls("Yes").Checked = True Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "Incumbency = 1"
End If
If e.Form.Controls("No").Checked = True Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "Incumbency = 0"
End If
If Filter > "" Then
DataTables("Users").LoadFilter = Filter
DataTables("Users").load()
End If
Group这个字段在表Users是存在,但在点击按钮的时候提示以下的错误:
.NET Framework 版本:2.0.50727.8935
Foxtable 版本:2018.10.9.1
错误所在事件:加载[Users]失败!
详细错误信息:
关键字 'Group' 附近有语法错误。