Anhang exportieren und Dateiendung ändern

[Emre_1996]

Hallo Leute,

 ich habe eine Datenbank und in dieser sind viele Dokumente.
 In jedem Dokument sind Anhänge eingefügt und ich möchte nun die Anhänge in einem Windows Ordner exportieren.

 Habe ich auch gemacht klappt super. Nun möchte ich nur noch, den Datei Namen des Anhanges so ändern, wie das Feld "Name" heißt und die Dateiendung des Anhangs immer .pdf ist.

 Meine Frage wie mache ich das mit LotusScript?

 Vielen Dank im Voraus

[koehlerbv]

Pfad und Dateiname sind doch Parameter der NotesEmbeddedObject Methode "ExtractFile" ...

Bernhard

[Emre_1996]

Vielen Dank für die schnelle Antwort Bernhard.

Dann wird aber die Dateiendung entfernt, wenn ich das so mache.

Habe es schon so versucht

Mfg
Tanriver

[Emre_1996]

Hallo Bernhard hattest doch recht.

Ich kann den Pfad gleich mitgeben. Habe noch zum Schluss vergessen + ".pdf" mitzugeben.


Danke nochmal

[koehlerbv]

Da wird keine Endung entfernt. Ändert man den Parameter path$, muss man sich natürlich auch selber um die Extension selber kümmern.
Ich manipuliere path$ faktisch immer, da ich ja fast immer prüfen muss, ob nicht mehrere Attachments gleichen Namens in einem Object befinden oder ein File gleichen Namens gibt es bereits im Zielpfad.

Bernhard

[Emre_1996]

Ich habe das Feld "Kategorie" (Dialog List).

Und das Zeichen "\" ist  an unbekannter Stelle . Kann ich das Zeichen ersetzen durch ein Leerzeichen, ohne zu wissen, an welcher Stelle es steht.?

[ghostmw]

Ja, kannst du ... ein kurzer Blick in die Hilfe bei @ReplaceSubstring sollte dir die Erleuchtung bringen.

Aber Vorsicht, das "\" ist ein Sonderzeichen in der Formelsprache, du musst es also "maskieren" mit einem weiteren "\".
Folglich wäre dein "\" in Formelsprache als "\\" zu notieren.

Dann klappts auch ...

[Emre_1996]

Super Danke für die schnelle Antwort

[Emre_1996]

Geht das auch mit LotusScript?

[koehlerbv]

Yipp. Das LS-Pendant findest Du auch bei @ReplaceSubstring erwähnt (wie üblich).

In LS muss der Backslash im String nicht besonders behandelt zu werden (kein Escape) - im Gegensatz zu den @functions.

Bernhard

[Emre_1996]

strKategorie = Replace(doc.Category(0), "/" , " ")

Das macht es aber nicht ?

[Tode]

Du willst ein "\" ersetzen und schreibst Replace( ... "/" )... Fällt Dir was auf?

[Emre_1996]

Hallo Tode,

mein Feld enthält beide Zeichen sowohl "/" als auch "\".

[koehlerbv]

Code?

[Emre_1996]

strKategorie = Replace(doc.Category(0), "/" , " ")

[koehlerbv]

Was willst Du nun ersetzen? Oben schreibst Du "\", unten im Code steht "/" ...

[Emre_1996]

mein String enthält beide Zeichen sowohl "/" als auch "\".

Beide Zeichen will ich ersetzen durch ein Leerzeichen " " .

[Klafu]

Probier es doch mal, indem du den Pfad selbst im Script verwendest und nicht das "doc.Category(0)".
Dann kannst du da einen Fehler schonmal ausschließen.

Code

Dim Pfad As String
Pfad = doc.Category(0)
strKategorie = Replace(Pfad, "/" , " ")

Chris

[Emre_1996]

Vielen Dank Christ hat geklappt

Danke euch allen...

mfg Tanriver

[koehlerbv]

Das ist Jacke wie Hose, Chris - funktionieren tun beide Varianten. Der Fehler steckt woanders.

"emre" soll halt den Debuger benutzen und schauen, was in doc.Category (0) steht und danach in strKategorie oder sich die Belegung mit einer Debugging Messagebox ausgeben lassen.

Bernhard