以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 卡在了查询语句上,请大神帮忙!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49159)

--  作者:bahamute
--  发布时间: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编辑过]

--  作者:y2287958
--  发布时间:2014/4/12 23:32:00
--  
试试这个:

Dim Filter As String
Filter =_UserName & " = False"
Filter = Filter & " And "
Tables("表A").Filter = Filter & "\'[接收人] like\'*" & _UserName & "*\'" 

--  作者:bahamute
--  发布时间:2014/4/12 23:36:00
--  
谢谢回复,可以通过编译,但运行会提示:

.NET Framework 版本:2.0.50727.5477
Foxtable 版本:2014.3.8.1
错误所在事件:
详细错误信息:
表达式包含无效的字符串常量: \'。

[此贴子已经被作者于2014-4-12 23:37:53编辑过]

--  作者:y2287958
--  发布时间:2014/4/12 23:39:00
--  
Tables("表A").Filter = _UserName & " = False" & " And [接收人] like\'*" & _UserName & "*\'" 

--  作者:bahamute
--  发布时间:2014/4/12 23:53:00
--  
可以运行了,正在测试,感谢大神帮助,我这弄了好长时间都没搞定。
--  作者:bahamute
--  发布时间:2014/4/13 1:06:00
--  
测试正常!图片点击可在新窗口打开查看

还想请教,定义r as row之后,如果引用当前用户名这一列,用dr(_UserName)还是dr("_UserName")呢?帮助里真没找到啊。
[此贴子已经被作者于2014-4-13 1:06:40编辑过]