- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 卡在了查询语句上，请大神帮忙！ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=49159)
-- 发布时间：2014/4/12 22:43:00
-- [求助] 卡在了查询语句上，请大神帮忙！
以下代码始终无法通过编译，提示多一个\'，请大神指点一二！
Dim Filter As String
Filter =" " & _UserName & " = \'" & False & "\'" \'表A有一逻辑列，列名与当前使用者同名
Filter = Filter & " And "
Tables("表A").Filter = Filter & "\'[接收人] like\'*" & _UserName & "*\'" \'接收人列是多值字段，筛选包含出当前使用者记录。
[此贴子已经被作者于2014-4-12 22:42:46编辑过]
-- 发布时间：2014/4/12 23:32:00
--
试试这个：
Dim Filter As String
Filter =_UserName & " = False"
Filter = Filter & " And "
Tables("表A").Filter = Filter & "\'[接收人] like\'*" & _UserName & "*\'"
-- 发布时间：2014/4/12 23:36:00
--
谢谢回复，可以通过编译，但运行会提示：
.NET Framework 版本：2.0.50727.5477
Foxtable 版本：2014.3.8.1
错误所在事件：
详细错误信息：
表达式包含无效的字符串常量: \'。
[此贴子已经被作者于2014-4-12 23:37:53编辑过]
-- 发布时间：2014/4/12 23:39:00
--
Tables("表A").Filter = _UserName & " = False" & " And [接收人] like\'*" & _UserName & "*\'"
-- 发布时间：2014/4/12 23:53:00
--
可以运行了，正在测试，感谢大神帮助，我这弄了好长时间都没搞定。
-- 发布时间：2014/4/13 1:06:00
--
测试正常！
还想请教，定义r as row之后，如果引用当前用户名这一列，用dr(_UserName)还是dr("_UserName")呢？帮助里真没找到啊。
[此贴子已经被作者于2014-4-13 1:06:40编辑过]