主题：帮忙看看这个代码错在哪里？

Dim Filter2 As String
Filter2 ="[业务员] = '" & User.Name & "' And [邮件状态] <> '归档' And [删除标记] = 0"
DataTables("邮件管理窗口_table13").LoadFilter = Filter2
DataTables("邮件管理窗口_table13").Load()

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