以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 发布后的软件只能启动一次  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102077)

--  作者:2900819580
--  发布时间:2017/6/13 9:09:00
--  [求助] 发布后的软件只能启动一次

发布后的软件只能启动一次,关闭后就不能再次启动了,需要重启电脑才可以。

 

无盘上安装了360杀毒会报毒。并启动时不给升级。。。。。。以前没有问题的,自从升级到6/8的升级包后,就出现这样的问题。

 

主要问题出现在无盘系统当中,有盘系统没有问题。

[此贴子已经被作者于2017/6/13 9:10:06编辑过]

--  作者:有点色
--  发布时间:2017/6/13 9:23:00
--  

  先升级到最新版吧。

 

  如果360报毒,那就添加一下白名单。

 

  你发布一个空白项目也是如此?


--  作者:2900819580
--  发布时间:2017/6/13 21:32:00
--  

关键是同的产项目,有些电脑可以,有些电脑不可以。

 


--  作者:有点蓝
--  发布时间:2017/6/13 21:41:00
--  
把程序加入杀毒软件的信任列表


--  作者:2900819580
--  发布时间:2017/6/14 14:03:00
--  

老师,我这个跟你给出的提示不一样,现在问题是,第一次启动是正常的,关闭后,启动就不行了。无任何错误提示

启动代码如下。。。。

 

 

 

If Syscmd.Project.Update(False,False) = False Then
    Forms("登录窗口").Open()
   
    If _UserName = "" Then
        Syscmd.Project.Exit()
        Return \'这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
    End If
   
   
    Tables("BOM").Cols("子阶代码").DropForm = "物料表查找下拉"
    Tables("生产车间欠料表").Cols("物料代码").DropForm = "物料表查找下拉"
    Tables("常用物料总表").Cols("子阶代码").DropForm = "物料表查找下拉"
    Tables("对应表").Cols("物料代码").DropForm = "物料表查找下拉"
   
    If _userRoles Like "*采购*" Then
        RibbonTabs("采购管理").Visible = True
    End If
    If _userRoles Like "*系统管理员*" Then
        RibbonTabs("系统").Visible = True
    End If
   
    Tables("Users").Visible = False
   

    BaseMainform.Text = "生产管理系统 " & Vars("版本")   
    AddHandler nfi.DoubleClick, AddressOf Icon_DoubleClick \'为通知区域图标添加双击事件
   
    nfi.ContextMenuStrip = cms
    nfi.Text = "酷狗音乐" \'鼠标移上去显示的文本
    nfi.Icon = new Icon(ProjectPath & "\\kg.ico") \'图标地址
    nfi.Visible = True \'设置为显示
   
   
   
End If


--  作者:有点色
--  发布时间:2017/6/14 14:40:00
--  
 你弄一个新的项目、空白的项目,发布后,同样也是一样的情况?