- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 加载数据总是说超时 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189482)
-- 发布时间：2023/12/4 19:10:00
-- 加载数据总是说超时
打开项目时总是提示查询超时已过期，其实项目打开后只需加载几百个订单，不知道怎么会这么久时间，以前在其它服务器上面同样的项目不会这样的问题，几百条数据很快就好了！
此主题相关图片如下：(rgck8uw(9g_a431f(txg.png
-- 发布时间：2023/12/4 20:35:00
--
可能：
1、网络慢
2、数据库数据多，没有优化，可以参考：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=158943&replyID=&skin=1
-- 发布时间：2023/12/4 20:52:00
--
全部数据下载也比打开项目来得快多了，不是网速的问题，一直就是提示查询超时，其实也不需要查询什么，之前在其它服务器上也用过，从来没有这个问题，也没有做什么优化
-- 发布时间：2023/12/4 20:56:00
--
如果是SqlServer，跟踪后台数据库看执行的那一条sql慢
-- 发布时间：2023/12/4 23:43:00
--
项目的AfterOpenProject事件代码是这样的
With DataTables("订单明细表")
.adduserstyle("日期分隔", Color.red, Color.white)
.LoadFilter = "订单日期>= \'" & Date.Today.AddDays( - 30) & "\'"
.Load()
End With
MainTable = Tables ("订单明细表")
Tables("订单明细表").Sort = "订单日期,员工_姓名,订单时间,交通地址_城市"
If User.Type <> UserTypeEnum.Developer AndAlso User.Type <> UserTypeEnum.Administrator Then
TableCaptionVisible = False
End If
-- 发布时间：2023/12/4 23:44:00
--
Select Case user.Group
Case "调度部"
Dim rb As RibbonMenu.Tab = RibbonTabs("订单管理")
rb.Visible = False
Dim rb4 As RibbonMenu.Tab = RibbonTabs("统计查询")
rb4.Visible = False
Dim rb6 As RibbonMenu.Tab = RibbonTabs("财务对账")
rb6.Visible = False
Tables("订单明细表").Cols.Remove("经纪收入","公司收入","归属经纪","归属收入","第三方","第三方收入","隐藏","客服收入","调度操作_统计","员工收入","结账员工","结账公司","经纪_姓名","经纪_编号","员工结算","客服结算","经纪结算","CS结算","CS")
Case "客服部"
Dim rb1 As RibbonMenu.Tab = RibbonTabs("调度操作")
rb1.Visible = False
Dim rb2 As RibbonMenu.Tab = RibbonTabs("计划操作")
rb2.Visible = False
Dim rb3 As RibbonMenu.Tab = RibbonTabs("信息发布")
rb3.Visible = False
Dim rb5 As RibbonMenu.Tab = RibbonTabs("统计查询")
rb5.Visible = False
Dim rb6 As RibbonMenu.Tab = RibbonTabs("财务对账")
rb6.Visible = False
Tables("订单明细表").Cols.Remove("经纪收入","隐藏","调度操作_统计","公司收入","归属经纪","归属收入","调度操作_已完成","第三方","第三方收入","员工收入","结账员工","结账公司","经纪_姓名","经纪_编号","员工结算","经纪结算","CS结算","CS")
Case "第三方"
Dim rb1 As RibbonMenu.Tab = RibbonTabs("调度操作")
rb1.Visible = False
Dim rb2 As RibbonMenu.Tab = RibbonTabs("计划操作")
rb2.Visible = False
Dim rb3 As RibbonMenu.Tab = RibbonTabs("信息发布")
rb3.Visible = False
Dim rb5 As RibbonMenu.Tab = RibbonTabs("统计查询")
rb5.Visible = False
Tables("订单明细表").Cols.Remove("经纪收入","隐藏","调度操作_统计","公司收入","归属经纪","归属收入","调度操作_已完成","第三方","第三方收入","客服收入","员工收入","结账员工","结账公司","经纪_姓名","经纪_编号","员工结算","经纪结算","CS结算","CS")
End Select
-- 发布时间：2023/12/4 23:46:00
--
If syscmd.project.update(False, False) = False Then
end if ,前面两段代码在这个IF内的
现在就是不知道怎么原因导致下载订单明细表失败，还有查询超时
-- 发布时间：2023/12/5 8:32:00
--
把"订单明细表"设置为初始不加载：http://www.foxtable.com/webhelp/topics/1268.htm
如果列比较多，建议分表
-- 发布时间：2023/12/5 17:05:00
-- 列名Identfy无效
我的订单明细表是之前数据导出为ECEL格式文档，然后在这个系统开发的时候，导入进来的，是不是因为没有Identfy这一列的原因啊，一直什么查询超时。
此主题相关图片如下：ha4}0qi@tu6@mlu{r%$q$n.png
-- 发布时间：2023/12/5 17:36:00
--
列名写错了，_identify