主题：[求助]请帮忙看看这段代码错在哪里？非常感谢！

下面的代码运行出错，请帮忙看看如何改？ Dim Filter1 As String Dim mails As List(Of String) mails = DataTables("邮件指派表").GetUniqueValues("", "邮箱") DataTables("邮件管理窗口_table12").Fill("Select * From {收邮件原始表} where 发件人 in mails ","sqlserver", False)
此主题相关图片如下：截图001.png

没有附件，没法看呀！！！

mails 所 赋的值 不符合条件语句中 in 后面的格式（'aa','bbb','ccc') 。

我要实现的功能是在DataTables("邮件管理窗口_table12")中加载数据，加载条件是如果“邮箱”不存在于表“邮件指派表”中，则加载。 Dim Filter1 As String Dim mails As List(Of String) mails = DataTables("邮件指派表").GetUniqueValues("", "邮箱")是提取“邮箱”， DataTables("邮件管理窗口_table12").Fill("Select * From {收邮件原始表} where 发件人 not in mails ","sqlserver", False) 这个fill应该怎么样写？或者可以用其它的加载语句，请指教！！！

请帮忙看看，非常感谢！

 

In 运算符用来判断某一个值是否在指定的一系列值中，例如：

[国籍] In ('中国','美国','英国','法国','俄罗斯')

表示判断国籍是否是上述五国之一，显然这比用OR来连接多个表达式要简洁很多。

同样如果在 In 运算符之前，加上 Not 关键词，表示不在指定的一系列值之中，例如：

[国籍] Not In ('中国','美国','英国','法国','俄罗斯')

表示国籍非上述指定的五国。

 

 

所以代码应该是：

 

Dim mails As string
mails = DataTables("邮件指派表").GetComboListString("邮箱")
mails = "'" & mails.Replace("|","','") & "'"
DataTables("邮件管理窗口_table12").Fill("Select * From {收邮件原始表} where 发件人 in (" & mails & ")","sqlserver", False)

再看看：

http://www.foxtable.com/help/topics/2410.htm