以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  退出系统语句不好用，用起来经常报错。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23657)
--  作者：Fotable
--  发布时间：2012/9/15 19:28:00
--  退出系统语句不好用，用起来经常报错。

我在beforeconnectouterdatasource中使用以下代码读取连接字符串

 

 

Dim connFile As String = e.ProjectPath & "conn.txt"
If e.Name = "zhujiwu" Then
    If Filesys.FileExists(connfile) Then
        Dim ip As String = FileSys.ReadAllText(connFile)
        e.ConnectionString = ip.trim
    Else       
        messagebox.show("数据库连接配置文件不存在,请建立配置文件."  ,"提示"  )
        Syscmd.Project.Exit()  \'如果没有配置文件就退出系统
    End If
End If

 

 Syscmd.Project.Exit()  执行后，没有立即退出，弹出一系列报错框。

狐表爸 想个办法完善下 Syscmd.Project.Exit()  吧 让执行该语句后，就什么也不错直接退出系统吧
--  作者：lin_hailun
--  发布时间：2012/9/15 19:58:00
--  
 楼主，在会出错的地方，要捕捉异常，这样就不弹出警告框了。

 http://www.foxtable.com/help/topics/2070.htm
--  作者：狐狸爸爸
--  发布时间：2012/9/17 9:10:00
--  

你自己设计的问题，不是什么事件都可以关闭系统的。

你应该在这个事件中判断配置文件是否存在：

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