Ich habe hier in einem Regel- Ordner bei einem User folgendes Problem:
Client: 6.5.5, Mail- Schablone, Server 6.5.5
Erstellt er eine Regel, geht alles wunderbar.
Öffnet er sie ein zweites Mal, geht es auch noch, beim dritten Aufruf kommt dann "Object Variable not set".
Und zwar in diesem Code
Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
Dim oldrule As notesdocument
Dim uidoc As notesuidocument
Dim ruledocs As notesdocumentcollection
Set ruledocs = source.documents
Set oldrule = ruledocs.getfirstdocument
If oldrule.HasItem("RuleType") And oldrule.GetItemValue("RuleType")(0) = "BU" Then
If oldrule.GetItemValue("RuleType")(0) = "BU" Then
Dim JunkRule As New JunkRules
Call JunkRule.ManageList()
End If
Else
If (ws.dialogbox("Mailrule", True, True,True, False, False, False,"Regel bearbeiten",oldrule, True, True)) Then
'The user clicked on OK, process their information in the form of a new filter document
Call oldrule.save(True, False,True)
End If
End If
ws.viewrefresh
continue = False
End Sub
An der Stelle:
If oldrule.HasItem("RuleType") And oldrule.GetItemValue("RuleType")(0) = "BU" Then
Problem ist:
- Source ist gefüllt
- ruledocs ist eine Collection mit Count = 1
- oldrule ist Nothing
Und das verstehe ich nicht.. wie kann ein getfirstdocument schief laufen, wenn ich eine Collection habe, die auf dem aufbaut, was ich SEHE, und nach dem Fehler sehe ich das Dokument immer noch, nur "getfirstdocument" kriegt das Dokument nicht...
Hat jemand ne mögliche Erklärung hierfür ?
Thanx
Tode