以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]打开窗口预览时,出现闪退或table表控件找不到  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=162929)

--  作者:onlinech
--  发布时间:2021/4/17 15:27:00
--  [求助]打开窗口预览时,出现闪退或table表控件找不到
一项目在窗口设计预览时,一次出现闪退,下一次就退下面的错误,都不能正常打开窗口

图片点击可在新窗口打开查看此主题相关图片如下:tu-1.jpg
图片点击可在新窗口打开查看

Object reference not set to an instance of an object.

重新做了一个项目也是这样的问题,在另一个项目中可以正常使用,但把其它多余窗口删除后就又出现这样的问题了

--  作者:onlinech
--  发布时间:2021/4/17 15:55:00
--  
把实例上上来,帮我看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:极简版v1.foxdb


数据库:外部SQL数据源

图片点击可在新窗口打开查看此主题相关图片如下:tu-2.jpg
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2021/4/17 16:40:00
--  
连不到数据库无法测试。下面几个问题改改

DataTables("称重信息").Fill("Select [序号],[流水号],[车号],[发货单位],[收货单位],[货名],[毛重],[皮重],[净重],[更新时间] From {称重信息} where [发货单位] <> \'\' ORDER BY [更新时间] desc", "170", True) 
‘如果不是特别需要不建议使用主表Fill,建议改为加载处理,如
DataTables("称重信息").loadfilter = "[发货单位] <> \'\'"
DataTables("称重信息").load
Tables("称重信息").sort = "更新时间 desc"
\'-------------
Tables("称重信息").SetColVisibleWidth("序号|40|流水号|100|车号|70|发货单位|120|收货单位|120|货名|80|毛重|100|皮重|100|净重|100|更新时间|150")  \'定义表格样式
Dim ggg As New GroupTableBuilder("统计表1", DataTables("称重信息"))
ggg.Groups.AddDef("更新时间", DateGroupEnum.Year, "年")
ggg.Groups.AddDef("更新时间", DateGroupEnum.month,"月")
ggg.Groups.AddDef("更新时间",DateGroupEnum.day, "日")
ggg.Totals.AddDef("净重", "", "净重_重量(公斤)")
ggg.SamePeriodGrowth = True
ggg.CircleGrowth = True
‘’ggg.Build() r如果使用了BuildDataSource就不要在使用Build,这一句去掉

Tables("main_Table3").DataSource = ggg.BuildDataSource()
Tables("main_Table3").AutoSizeCols()
e.Form.Controls("Table3").Visible = True

--  作者:onlinech
--  发布时间:2021/4/17 21:42:00
--  
希望只从后台数据库读取今天的数据
DataTables("称重信息").loadfilter = "[更新时间] >= \'" & Date.Today() & "\' And [发货单位] <> \'\'"
代码也没报错,但是读取的是所有数据

图片点击可在新窗口打开查看此主题相关图片如下:tu-3.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:tu-4.jpg
图片点击可在新窗口打开查看



--  作者:onlinech
--  发布时间:2021/4/17 21:52:00
--  
上传一下数据库,原数据库太大了,这是手工重新制作
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:wei.rar



--  作者:有点蓝
--  发布时间:2021/4/18 20:57:00
--  
我测试没有问题,这个条件【"[更新时间] >= \'" & Date.Today() & "\' And [发货单位] <> \'\'"】绝对不可能读取的是所有的数据,如果出现这种情况,肯定是其它代码影响,以其它条件重新加载了数据。

如果不想受主表影响,建议使用sqltable
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:极简版v1.zip



--  作者:onlinech
--  发布时间:2021/4/20 10:03:00
--  
还报错,如果不加【 [更新时间] >= \'" & Date.Today() & "\'】,就不报错

--  作者:onlinech
--  发布时间:2021/4/20 10:05:00
--  
将table1,设为sqltable

图片点击可在新窗口打开查看此主题相关图片如下:tu-3.jpg
图片点击可在新窗口打开查看


--  作者:onlinech
--  发布时间:2021/4/20 10:06:00
--  
错误提示如下:

图片点击可在新窗口打开查看此主题相关图片如下:tu-11.jpg
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2021/4/20 10:14:00
--  
请仔细看6楼的实例是怎么用的