以文本方式查看主题

-  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=142368)

--  作者:18504175995
--  发布时间:2019/10/25 9:07:00
--  不存在名为“”的窗口

AfterOpenProject事件中有这样的代码

Forms("主页").Open()

MainTable = Tables("报价明细")

这个项目开发一年多了,一直没什么问题,可是最近偶尔开表时会报错

不存在名为“主页”的窗口,然后开表后就看不到我设计的窗口了,

关了重开几次又会恢复正常,有时候开表就一点问题也没有

我从来没有改过窗口名字,这段时间也没对窗口进行什么改动,请问老师这个是什么原因造成的?要怎么解决?


--  作者:有点蓝
--  发布时间:2019/10/25 10:06:00
--  
关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。
--  作者:18504175995
--  发布时间:2019/10/25 10:33:00
--  
昨天试了,还是有这样的问题,关键是发布好的也出现
还有就是这个毛病还不是次次都出现,我们办公室用的是远程数据库


--  作者:有点蓝
--  发布时间:2019/10/25 10:45:00
--  
联系客服核对一下激活码
--  作者:18504175995
--  发布时间:2019/10/25 11:01:00
--  
刚才核对了,激活码没问题


--  作者:有点蓝
--  发布时间:2019/10/25 11:17:00
--  
把其它项目事件和全局代码都注释掉,测试还有没有错误?

主页窗口afterload事件写了什么代码?

--  作者:18504175995
--  发布时间:2019/10/25 15:18:00
--  
主页窗口无代码
项目事件AfterOpenProject 内容
Forms("主页").Open()
MainTable = Tables("报价明细")
\'自动打开主页定位主表
If User.name = "李萍(开发者)"
    TableCaptionVisible = True
Else
    TableCaptionVisible = False
End If
\'表名可见权限
Select Case User.Group
    Case "市场计划管理员","商务","业务负责人","李萍(开发者)","张志贤(管理员)","经理","商务审批","财务审批","出纳"
        Forms("主页").Controls("计划皮窗口").TabPages(0).Visible = True
    Case "操作员","调度","仓管员","财物","重柜业务员","外贸操作"
        Forms("主页").Controls("计划皮窗口").TabPages(0).Visible = False
End Select
\'报表明细可见授权
Select Case User.Group
    Case "商务","李萍(开发者)","张志贤(管理员)","经理","财务审批","市场计划管理员","商务审批","出纳"
        Forms("主页").Controls("导航主板").TabPages(4).Visible = True
    Case "操作员","调度","仓管员","重柜业务员","外贸操作","业务负责人","后程管理"
        Forms("主页").Controls("导航主板").TabPages(4).Visible = False
End Select
\'商务页面可见授权
Tables("主页_派车需求与集港").OpenView("集港表视图")
Tables("主页_铁路辅料操作需求").OpenView("辅料视图")
Tables("主页_铁路淀粉操作需求").OpenView("淀粉视图")
Tables("产品发运通知单.费用预算明细表").OpenView("正常视图")
Tables("信风铁路辅料导入.操作派车需求").OpenView("辅料视图")
Tables("信风铁路淀粉导入.操作派车需求").OpenView("淀粉视图")
\'固定视图界面
DataTables("操作派车需求").ReplaceFor("编辑者",Nothing,"编辑者 = \'" & User.Name & "\'")
DataTables("操作派车需求").Save()
\'Tables("操作派车需求").Cols.Remove("编辑者")
With Tables("产品发运通知单")
    .Cols("备注").OpenWindow()
End With

--  作者:有点蓝
--  发布时间:2019/10/25 15:26:00
--  
主页是什么类型的窗口?主窗口?模式窗口?
主页的所有者表是哪个?这个表有没有加载?

--  作者:18504175995
--  发布时间:2019/10/28 8:38:00
--  
主窗口,有加载
--  作者:有点蓝
--  发布时间:2019/10/28 8:51:00
--  
项目是不是加载了很多表和数据。有没有做动态加载?有没有限制数据加载量?