Foxtable(狐表)用户栏目专家坐堂 → 项目启动慢


  共有1928人关注过本帖树形打印复制链接

主题:项目启动慢

帅哥哟,离线,有人找我吗?
蓝蚂蚁
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7897 威望:0 精华:0 注册:2016/6/11 11:10:00
项目启动慢  发帖心情 Post By:2019/4/18 18:54:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:显目启动慢.jpg
图片点击可在新窗口打开查看

每次打开项目时都是显示图片那个表格,慢的时候要等3分钟左右,这个表格等数据不算大的,项目里有个4万多行等,在启动时一闪就过去里,请问老师到底是什么原因?谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
蓝蚂蚁
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7897 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2019/4/18 18:57:00 [显示全部帖子]

AfterOpenProject 代码如下

If User.Type <> UserTypeEnum.Developer
    TableCaptionVisible = False
End If
Forms("背景图窗口").Show


Tables("高值耗材病人使用明细表").Cols("中标号或编号").DropForm = "高值输入中标号填充其他列弹出筛选窗口"

Tables("高值耗材病人使用登记表").Cols("住院号").DropForm = "中联电脑高值耗材使用情况明细弹出窗口"


DataTables("高值耗材病人使用登记表").DataCols("合格证").DefaultFolder = ProjectPath & "AllMyFiles\植入物合格证Fox位置"  '图片列中图片的存储位置
DataTables("高值耗材病人使用登记表").DataCols("合格证").SourceFolder= ProjectPath & "AllMyFiles\植入物合格证"  '图片列中图片的来源位置


'----------------
Dim obj As GlobalKeyDown = GlobalKeyDown.getInstance
RegisterHotKey(obj.Handle, 101, KeyModifiers.Control Or KeyModifiers.Shift, Keys.P)
RegisterHotKey(obj.Handle, 102, KeyModifiers.Control Or KeyModifiers.Shift, Keys.Q)
'-----------------


 回到顶部
帅哥哟,离线,有人找我吗?
蓝蚂蚁
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7897 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2019/4/18 19:51:00 [显示全部帖子]

大概14秒左右  但我再正常启动项目时大概也是16秒左右

 回到顶部