主题：同步加载出问题

表【S行政区域ZD】没有对应的列，就会出错，也就是列名写错。

 

执行代码，看弹出什么 msgbox(DataTables("S行政区域ZD").LoadFilter)

 

看看你数据库表格里面，条件里面有没有对应的列。

表格【S行政区域ZD】没有列【乡镇】，注意，【乡镇】列不能是表达式列。

看看表格的beforeload、afterLoad事件有没有写代码。删除看看。

 

如果还有问题，实例发上来测试一下。

绝对是你列名写错了。

 

两个表、两个列，都必须存在，否则就会报错。

S行政区域ZD表格beforeLoad事件

 

If User.Group = "乡镇"
    Dim fl As String = "[乡镇] = '" & User.Name & "'"
    If e.DataTable.LoadFilter = "" Then
        e.DataTable.LoadFilter = fl
    ElseIf e.DataTable.LoadFilter.IndexOf(fl) < 0 Then
        e.DataTable.LoadFilter = e.DataTable.Loadfilter & " And " & fl
    End If
End If

 

或者是，把beforeLoad事件的代码删除掉。