以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ukey启动的小问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79893)

--  作者:hdffzxf
--  发布时间:2016/1/11 19:27:00
--  ukey启动的小问题

因为用户名存储在外部数据源,所以在BeforeConnectOuterDataSource事件中加入了判断ukey是否启动的程序,这应该是程序启动最早的事件,希望在用户登录前就判断是否存在ukey。

程序如下:

If UKey.Start() Then

    If UKey.Encrypt2("XXXsoft")<>"XXX900" Then

        e.HideSplashForm=True

        MessageBox.Show("启动UKey失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

        Syscmd.Project.Exit()

    End If

Else

    e.HideSplashForm=True

    MessageBox.Show("请插上本软件的UKey!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

    Syscmd.Project.Exit()

End If


两个问题:1、Syscmd.Project.Exit()不管用,仍会弹出用户登录窗口;

          2、MessageBox.Show弹出时,总是不出现在最前端,若不是任务栏有提示,还真不知道弹出来了。


--  作者:大红袍
--  发布时间:2016/1/11 19:33:00
--  

1、写到beforeOpenProject事件

 

http://www.foxtable.com/help/topics/1615.htm

 

2、

 

MessageBox.Show("提示!", "重要提示",MessageBoxButtons.Ok,MessageBoxIcon.Question, 0, Windows.forms.MessageBoxOptions.ServiceNotification)


--  作者:hdffzxf
--  发布时间:2016/1/11 23:33:00
--  
原来就是写在这个事件里,就是提示框总被遮挡,现在第2个问题解决了,一切OK了!这些招数都是帮助文档中没有的,谢谢!
[此贴子已经被作者于2016/1/11 23:33:44编辑过]