主题：查询表加载所有行时出错求助！

如题，当我在查询表的加载树点击“加载所有行”时会出现下面的红色错误提示：

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.11.11.1
错误所在事件：产品系列设置,BeforeLoad
详细错误信息：
从字符串“{obas_part1}.part_attr = '1' and”到类型“Long”的转换无效。
输入字符串的格式不正确。

BeforeLoad 代码如下，不知如何做才不会有错误？

Dim fl As String = "{obas_part1}.part_attr = '1' and {obas_part}.act_sw = '1' and obas_base_code.code_type = '115'"
Dim f2 As  String = "{obas_part1}.part_attr = '2' and {obas_part}.act_sw = '1' and obas_base_code.code_type = '115'"
Dim f3 As String = fl & f2
If e.DataTable.LoadFilter = "" Then
    e.DataTable.LoadFilter = fl Or f2
ElseIf e.DataTable.LoadFilter.IndexOf(f3) < 0 Then '如果没有包括条件
    e.DataTable.LoadFilter =e.DataTable.Loadfilter & " And " & fl & " Or " & e.DataTable.Loadfilter & " And " & f2
End If

 你这个是查询表？你这个是全局事件？

 试试不要用单引号。

是查询表，上面的代码是在表的事件BeforeLoad

试过不用单引号也一样出错！

 看查询表的sql语句是什么，贴出来看看。

 要不，就做个例子发上来

将代码变为如下所示，特别是红色字的就正常了，谢谢各位！

Dim f1 As String = "{obas_part1}.part_attr = '1' and {obas_part}.act_sw = '1' and {obas_base_code}.code_type = '115'"
Dim f2 As  String = "{obas_part1}.part_attr = '2' and {obas_part}.act_sw = '1' and {obas_base_code}.code_type = '115'"
Dim f3 As String = f1 & f2
If e.DataTable.LoadFilter = "" Then
    e.DataTable.LoadFilter = f1 & "Or" & f2
ElseIf e.DataTable.LoadFilter.IndexOf(f3) < 0 Then '如果没有包括条件
    e.DataTable.LoadFilter =e.DataTable.Loadfilter & " And " & f1 & " Or " & e.DataTable.Loadfilter & " And " & f2
End If