以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  登录慢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184261)

--  作者:nuoyan89
--  发布时间:2022/11/30 16:22:00
--  登录慢
老师,我系统点击登录时,打开那个登录窗口得等上半分钟,这种情况可以怎么改善吗?谢谢

Forms("用户登录").Open()
If _UserName = "" Then
    Syscmd.Project.Exit()
    Return \'这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
End If
\'后续初始化代码
Forms("区域一").show()
Forms("导航窗口").show()
Forms("登录显示").show()
ApplicationMenu.Visible=False
If User.Type <> UserTypeEnum.Developer
    TableCaptionVisible = False
End If

--  作者:有点蓝
--  发布时间:2022/11/30 16:30:00
--  
打开下面窗口慢?窗口有什么事件代码?

Forms("用户登录").Open()


--  作者:nuoyan89
--  发布时间:2022/11/30 16:57:00
--  
是点击启动之后要半分钟左右,才能弹出用户登录这个窗口,下面的都正常了
--  作者:有点蓝
--  发布时间:2022/11/30 16:58:00
--  
其它项目事件有什么代码?


--  作者:nuoyan89
--  发布时间:2022/11/30 17:18:00
--  
老师,以下是整个项目属性里的代码,请帮忙看看,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (2).txt


--  作者:有点蓝
--  发布时间:2022/11/30 17:27:00
--  
有2种可能会导致久
1、项目加载了全部数据,数据越多就越慢
2、BeforeOpenProject事件,如果这个地址【\\\\192.168.1.10】不通,这个代码会导致30秒才会有结果

--  作者:nuoyan89
--  发布时间:2022/11/30 17:33:00
--  
老师,第2种情况估计不会,因为我们还有一个APP,这个登录是正常的,我们现在这个系统数据量是挺大的,如果是第一种情况的话可以怎么优化的呢?可以怎么入手呢?谢谢
--  作者:有点蓝
--  发布时间:2022/11/30 17:40:00
--  
这个未必。可以自己计算一下每个事件执行的时间:http://www.foxtable.com/webhelp/topics/2226.htm
--  作者:nuoyan89
--  发布时间:2023/4/4 10:54:00
--  
老师,整个项目事件我就只留了一个代码,如下,测试耗时为:3.585秒。其他的代码我全部删除了,但是还是等很长时间才进去。

Dim st As Date = Date.Now \'将开始时间保存在变量st中
If e.name = "ERP管理系统" Then
    e.Con ne ction St rin g 等于 "Pr ovid er=S QLO LED B.1;Pa ss word=Ab284567;Pers ist Secu rity Info=True;U ser ID=sa;Initi al Catalog =条码扫 描数据库;Data Source=192.168.1.00"
End If 
MessageBox.Show("耗时: " & (Date.Now - st).TotalSeconds & "秒")
[此贴子已经被作者于2023/4/4 10:55:35编辑过]

--  作者:有点蓝
--  发布时间:2023/4/4 10:56:00
--  
减少加载的表格:http://www.foxtable.com/webhelp/topics/2752.htm