主题：[求助]无法解释位置 15 的标记“}”。

老师，
  昨天遇见一回这个情况，今天又出现了，不知道为何

 .NET Framework 版本：2.0.50727.3053
Foxtable 版本：2017.8.19.1
错误所在事件：自定义函数za_ck_afterload
详细错误信息：
调用的目标发生了异常。
无法解释位置 15 的标记“}”。

 你写了什么代码？合成sql语句应该有问题。

 Dim drs As List (of DataRow)=dt.Select("codelevel=1") 这么写就能行

Dim drs As List (of DataRow)=dt.Select("{za_pagelayout}.[codelevel]=1")  这样写就不行

不解 烦请老师 教我

代码部分

''根据页面风格生成页面区域
Dim e As object=args(0)
Dim tbl_main As WinForm.TabControl = e.Form.Controls("bbk_tbl_top")
Dim pg As WinForm.TabPage= tbl_main.TabPages(1)
Dim dt As DataTable=lsb("ZA003")
Dim ftr As String= "{za_pagelayout}.[ckname]='"& e.form.name &"' and {za_pagelayout}.[ym_gzid] Like '"& PG.NAME &"%'"
dt.LoadFilter = ftr
dt.Load()
Dim st As Date = Date.Now

Select Case pg.name
    Case "JD"
        Dim trv_main As WinForm.TreeView = e.Form.Controls("trv_main")
       Functions.Execute("za_ck_trvaddnote",e,trv_main,"za_pagelayout")
’以上执行没有问题，表也可以生成
        Dim drs As List (of DataRow)=dt.Select("codelevel=1")‘问题就出现在这里
        If drs IsNot Nothing Then
            For Each dr As DataRow In drs
                Dim tab As WinForm.TabControl = e.Form.Controls("tbl_all")
                Functions.Execute("za_nb_fgset",tab,dr,e)
            Next
        End If
        vars("p1_pidx") = New List(Of String)'窗口按钮字典
        tbl_main.SelectedIndex=1
End Select
MessageBox.Show("添加控件耗时: " & (Date.Now - st).TotalSeconds & "秒")

lsb("ZA003")生成如下

此主题相关图片如下：qq图片20170914082613.png

没有查到结果 也不至于 报错

查询表结构，表结构的名字是什么你就要写什么 http://www.foxtable.com/webhelp/scr/0193.htm

 

恩找到规律了