RDO异步连接的问题

Question

Godofrain, 谢谢你！
可以我还是不明白你说的连接断开是指什么？
在程序中，所有的都Close，并且设置为Nothing了。你可以说的详细点吗？

Answer 1

我解决问题了：
只是将connecttodb的UnConnectDB改动 了一下：
Public Sub UnConnectDB()
  If (Flag = True) Then
    rdoC.Close
    Set rdoC = Nothing
    'rdoE.Close
    'Set rdoE = Nothing
  End If
End Sub
就是不关闭rdoE。
我想：可能是由于 set rdoE = rdoEnvironments(0)，rdoE就是RDO系统自己默认的一个系统环境变量，如果将rdoE关闭， RDO就没有默认的系统环境变量，因此就出现了问题。
如果将rdoE关闭了，使用的时候，创建一个rdoEnvironment,也许可是可以的，但是我没有具体地做，只是一种推测。