- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]无法解释位置 15 的标记“}”。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106683)
-- 发布时间：2017/9/13 17:30:00
-- [求助]无法解释位置 15 的标记“}”。
老师，
昨天遇见一回这个情况，今天又出现了，不知道为何
.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2017.8.19.1
错误所在事件：自定义函数za_ck_afterload
详细错误信息：
调用的目标发生了异常。
无法解释位置 15 的标记“}”。
-- 发布时间：2017/9/13 17:37:00
--
你写了什么代码？合成sql语句应该有问题。
-- 发布时间：2017/9/14 8:24:00
--
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")生成如下
-- 发布时间：2017/9/14 8:27:00
--
此主题相关图片如下：qq图片20170914082613.png
-- 发布时间：2017/9/14 8:28:00
--
没有查到结果 也不至于 报错
-- 发布时间：2017/9/14 8:43:00
--
查询表结构，表结构的名字是什么你就要写什么 http://www.foxtable.com/webhelp/scr/0193.htm
-- 发布时间：2017/9/14 9:15:00
--
恩找到规律了