Domino 9 und frühere Versionen > ND8: Entwicklung

VBA Access gesendete Mails in einen neu Anlegten Ordner speichern

<< < (2/4) > >>

ChristianS:
Hallo

ich habe die Designerhilfe leider nicht :(

Glombi:

--- Zitat von: ChristianS am 05.04.08 - 11:40:11 ---Hallo

ich habe die Designerhilfe leider nicht :(

--- Ende Zitat ---
Die gibts auf den IBM Seiten:
http://www-128.ibm.com/developerworks/lotus/documentation/dominodesigner/

Andreas

ChristianS:
ui das ist ja alles Englisch :(

könnte mir vielleicht wer ein bisschen Syntax geben ;) ?

guesswho:

--- Zitat ---ui das ist ja alles Englisch
--- Ende Zitat ---
jepp, und das bedeutet: ohne Übersetzungsfehler  ;D

Frag mal deinen Admin ob er dir nicht die Designer-Hilfe zur Verfügung stellen kannst, ich gehe mal davon aus, du hast auch keinen Notes-Designer ?!

Aus der Designer-Hilfe

Adds a document to the specified folder. If the folder does not exist in the document's database, it is created.

Defined in
NotesDocument

Syntax
Call notesDocument.PutInFolder( folderName$ [, createonfail ] )

Parameters
folderName$
String. The name of the folder in which to place the document. The folder may be personal if the script is running on the workstation. If the folder is within another folder, specify a path to it, separating folder names with backward slashes, for example, "Vehicles\Bikes".
createonfail
Boolean. Optional. Specify True so that a folder will be created if it does not exist.
Usage
If the document is already inside the folder you specify, PutInFolder does nothing. If you specify a path to a folder, and none of the folders exists, the method creates all of them for you. For example:
Call doc.PutInFolder( "Vehicles\Bikes" )
If neither Vehicles nor Bikes exists, PutInFolder creates both, placing the Bikes folder inside the Vehicles folder.
This method cannot add the first document to a folder that is "Shared, Personal on first use."

Examples: PutInFolder method
1.   This script puts a document in the folder Jambalaya.
Dim doc As NotesDocument
'...set value of doc...
Call doc.PutInFolder( "Jambalaya" )
  2.   This script puts a document in the folder Spicy, which is located inside the folder Recipes.
Dim doc As NotesDocument
'...set value of doc...
Call doc.PutInFolder( "Recipes\Spicy" )
  3.   This script puts a document in the private folder called Greens.
Dim doc As NotesDocument
'...set value of doc...
Call doc.PutInFolder( "Greens" )
  4.   This script performs a full-text search in the current database and places the top twenty matching documents in a folder called Spicy. If the folder does not exist, one will be created.
Dim session As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set dc = db.FTSearch("cayenne",20)
Set doc = dc.GetFirstDocument
While Not(doc Is Nothing)
  Call doc.PutInFolder("Spicy",True)
  Set doc = dc.GetNextDocument(doc)
Wend
  5.   This script selects all the documents within a document collection that contain the field "Conflict", and moves them to a folder.
Dim s As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = s.CurrentDatabase
Set dc = db.AllDocuments
Set doc = dc.GetFirstDocument
While Not(doc Is Nothing)
     If doc.IsResponse Then
        If doc.HasItem("$Conflict") Then
           Call doc.PutInFolder("Conflicts")
        End If
     End If
     Set doc = dc.GetNextDocument(doc)
Wend

datt jibbet halt nich in deutsch...

Siehs postitiv: KEINE Übersetzungsfehler !

Aber die Designer-Hilfe könnte dir wirklich helfen, falls du öfter in Richtung Notes programmierst....

Jo

guesswho:
Adobe Acrobat Reader in deutscher Doku heisst deshalb: Lehmziegel Zauberkünstler Leser...  ;)

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete

Zur normalen Ansicht wechseln