主题：BeforeConnectOuterDataSource问题？

 不能在 BeforeConnectOuterDataSource 写退出代码。

 要写到beforeOpenProject事件里去。

 在beforeopenproject那里检查

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

 那你这样写

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")

For Each p As System.Diagnostics.Process In ps
    If p.MainWindowTitle = Nothing OrElse p.MainWindowTitle.contains("新项目") Then
        p.kill
    End If
Next

如果是多个数据源，你可以判断 e.Name 属性

If Connections.TryConnect(e.ConnectionString) = False Then
    MessageBox.show(e.ConnectionString)

    Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
   
    For Each p As System.Diagnostics.Process In ps
        If p.MainWindowTitle = Nothing OrElse p.MainWindowTitle.contains("新项目") Then
            p.kill
        End If
    Next
End If