Domino 9 und frühere Versionen > ND6: Entwicklung
Problem mit collection.PutAllInFolder
Alexis:
Hallo Forum,
was kann hier falsch sein:
Sub Click(Source As Button)
Dim session As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim uidoc As NotesUIDocument
Dim docCurrent As NotesDocument
Dim rtitem As NotesRichTextItem
Dim Mailserver As String
Dim Mailbox As String
Dim Mailview As String
Dim ID As String
*
*
*
Set db=session.CurrentDatabase
Set uidoc = workspace.currentdocument
ID=uidoc.FieldGetText("ID_Owner")
Mailserver="MAIL.COM/SRV/CCN"
Mailbox="MAIL\ALL" & ID & ".NSF"
Mailview="All by Date"
Set collection = workspace.PickListCollection(1, True, Mailserver,Mailbox,Mailview,"Mail Selection","Please select a document.")
Call collection.PutAllInFolder( "MailFolder",True)
End Sub
Die Collection ist nicht leer, dennoch wird nichts in den Folder gepackt. ???
Alexis
Axel:
Hi,
existiert der Ordner? Ist es evt. ein privater Ordner?
Mir ist so im Hinterkopf, dass es Probleme mit dieser Methode gab, wenn der Ordner nicht vorhanden war.
Axel
Alexis:
Hallo Axel,
der Ordner wird offensichtlich in der Mail-Datenbank angelegt und dort werden auch die Mails abgelegt! Der Ordner existiert in der Zieldatenbank und ist nicht privat.
Ich verstehe nur noch Bahnhof.
Alexis
Axel:
Hi,
so richtig hast du meine Fragen nicht beantwortet.
Ist der Ordner bereits vorhanden?
Ist ein gemeinsamer Ordner oder ein privater?
Axel
Alexis:
Hallo Axel,
der Ordner existiert in der Datenbank aus der ich die Aktion ausführe.
Der Ordner ein gemeinsamer.
Der Code legt jedoch in meiner Mailbox (!!!) ebenfalls den entsprechenden Ordner an!
Das verstehe ich nicht.
Alexis
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln