Question

我有一个可用的Lotus Notes代理。在LN 7上运行。我的代理每5分钟运行一次，只要在Microsoft SQL（2005）表上找到某些特定记录，它就会发送一些邮件。

它通常工作正常，但最近它停止工作 - 现在不止一次 - 并且在Notes服务器重新启动或Notes管理员重新启动所有代理之前不会重新启动（我没有注释管理员，所以我'我真的不确定他做了什么，我正试图将这些信息添加到这个问题中。）

我正在试图排除我能想到的任何事情，我唯一想到的是我的LN代理运行查询的MS SQL Server存在一些稳定性问题，并且可能并不总是在线。我认为这可能是问题的原因...（我试图在我的代理上次成功完成时，从SQL交叉引用正常运行时间日志。）

我在想是否有办法管理连接，除了我正在做的事情，所以我可以排除（缺少）连接问题。

提前感谢您提供的任何建议。

亲切的问候，

迭

Option Public

Uselsx "*LSXODBC"

Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim subject As String, cc As String, bcc As String, sender As String, OID As String, mailto As String, bodyNotMIME As String
Dim body As NotesMIMEEntity


On Error Goto errorCounter

Set db = session.CurrentDatabase

Gosub SendMailGeneral

Exit Sub

SendMailGeneral:
Dim con As New ODBCConnection
Dim qry As New ODBCQuery
Dim result As New ODBCResultSet
Dim defaultQuery As String
Set qry.Connection = con    
If con.ConnectTo("DSN_Name","USER_NAME", "PASSWORD") Then
    Set result.Query = qry
    defaultQuery = "select TOP (10)  * from Message  where StatusType=0"
    qry.SQL = defaultQuery      
    result.Execute
    If (result.IsResultSetAvailable) Then
        Do
            result.NextRowcode

            //here´s all the code that gets the results from each table´s fields and transform them into notes mails

        Loop Until result.IsEndOfData
    End If
End If
result.Close(DB_CLOSE)  
Return

End Sub

Answer 1

我有一个非常类似的问题（在Domino 6.0.4中），这是由于一个错误。已经有一段时间了，所以我不记得我发现它报告的位置但是（可能在notes.net上），但我花了很多时间试图找出解决方法。在我的情况下，唯一的解决方法是重启服务器。

让管理员检查日志，查看代理触发时的任何错误消息。您还可以向代理添加一些打印语句，这些语句将写入日志，只是为了确认代理正在运行。

如果您的问题与我的相同，症状将是：

代理运行正常，但是与发送邮件相关的日志中存在错误。
发送邮件的任何其他代理也会受到影响。
它能在数周甚至数月内正常工作，然后突然停止工作。
并且不幸的是，我发现的唯一修复是在发生时重新启动。

Answer 2

以防其他人有同样的问题：

我们终于发现SQL服务器出现了一些超时错误，并且Notes服务器上有一条错误消息提示阻止代理运行，直到单击确定按钮（！）。

为了避免服务器上出现这些“可视”提示错误，我发现了我的OCBC连接定义中的SilentMode选项：这是你必须做的：

con.SilentMode = True

非常感谢！

管理Lotus Notes代理上的不稳定SQL连接

2 个答案: