以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 交叉统计问题困扰,请指教! (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4628)
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 10:32:00
-- 交叉统计问题困扰,请指教!
大侠们请出手相助,这段代码怎么不行了呢,10月11日更新之前还好好的
MainTable = Tables("wmdd") Syscmd.Table.load Dim g As New CrossTableBuilder("tj01", DataTables("wmdd"), "[部门编码]=\'0148\'and [排产日期] >= #2009-10-01#") g.HGroups.AddDef("分类编码") g.HGroups.AddDef("分类名称") g.VGroups.AddDef("排产日期", DateGroupEnum.None) g.Totals.AddDef("计划数量", "计划数量") g.OrderByTotal = True g.HorizontalTotal = True g.Filter = "[部门编码]=\'0148\'and [排产日期] >= #2009-10-01#" g.Build() MainTable = Tables("tj01") For Each cl As Col In CurrentTable.Cols cl.Width = 42 Next CurrentTable.Cols(1).Width =155 CurrentTable.Cols.Frozen = 2 Syscmd.Table.ChangeAlterBackColor(Color.Beige) Syscmd.Table.ChangeGridLineColor(Color.gray)
提示错误信息如下:
此主题相关图片如下:lll.bmp
[此贴子已经被作者于2009-10-15 10:36:03编辑过]
|
-- 作者:gamtings
-- 发布时间:2009/10/15 10:34:00
--
楼主这个名字听起来有点恐怖呀!!!!
|
-- 作者:yangming
-- 发布时间:2009/10/15 10:37:00
--
楼主还是上传文件测试,才知道,另外,你有什么提示吗?
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 10:40:00
--
文件全部是外部查询表,而且发现同步表数据操作(也就是系统菜单“同步”)时假死
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 10:43:00
--
然后就会出现上述提示
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 10:47:00
--
在线等啊,他爹在不
|
-- 作者:狐狸爸爸
-- 发布时间:2009/10/15 10:49:00
--
做个例子给我测试吧,否则我啥也看不出来
|
-- 作者:狐狸爸爸
-- 发布时间:2009/10/15 10:54:00
--
应该是这行的问题:
Syscmd.Table.load
你删除看看能否执行。
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 10:59:00
--
问题应该出在同步外部数据表的命令上了,代码后面是正确的, MainTable = Tables("wmdd") Syscmd.Table.load 这里有问题
|
-- 作者:唐尸三摆手
-- 发布时间:2009/10/15 11:00:00
--
删除就可以了,但是外部数据要更新如何修改这句代码,请指教!
|