Autor Thema: Entwickler-Noob-Frage  (Gelesen 1788 mal)

Offline typeOneg

  • Aktives Mitglied
  • ***
  • Beiträge: 204
  • Geschlecht: Männlich
    • My Band
Entwickler-Noob-Frage
« am: 21.10.15 - 09:45:35 »
Hi Kollegen und -innen,

ich bin ja Admin und kein Entwickler, deshalb bräuchte mal kurz eure Hilfe :-)

Ausgangslage:
es soll in diversen Mailboxen eine gemeinsame Mailvorlage zur Verfügung gestellt werden

Lösungsansatz:
ich hab' ein Script gefunden, das über einen Button-Hotspot in einer Mail den Bodytext als Vorlage in der Mailbox des Users speichert. Also grundsätzlich das, was ich brauche.

Problem:
Wie bekomme ich beim Kopiervorgang (wenn die Mail zur Vorlage wird) den Button-Hotspot raus, sodass dieser in der Vorlage nicht mehr enthalte ist?

wenn ich das "rtitem.remove" nämlich drin lasse

   Dim rtitem As NotesRichTextItem
   Set rtitem = Stationdoc.GetFirstItem("Body")
   Call rtitem.remove   

ist immer alles weg, nicht nur der Button.

Ich hoffe, ich hab' mich verständlich ausgedrückt :-)

Hier der Scriptcode, der hinter der Schaltfläche liegt:

Code

Sub Click(Source As Button)
	Dim ws As New NotesUIWorkspace
	Dim s As New NotesSession
	Dim uidoc As NotesUIDocument
	Dim doc As NotesDocument
	Dim db As NotesDatabase
	Dim StationDoc As NotesDocument
	
	Set db = s.CurrentDatabase
	Set uidoc = ws.CurrentDocument
	Set doc = uidoc.Document
	
	Set StationDoc = doc.Copytodatabase(db)
	
	Dim rtitem As NotesRichTextItem
	Set rtitem = Stationdoc.GetFirstItem("Body")
	Call rtitem.remove	
	
	Call StationDoc.RemoveItem("DefaultMailServerOptions")
	Call StationDoc.RemoveItem("PostedDate")
	Call StationDoc.RemoveItem("ExcludeFromView")
	Call StationDoc.RemoveItem("Recipients")
	Call StationDoc.RemoveItem("$Revisions")
	Call StationDoc.RemoveItem("$VERREF")
	Call StationDoc.RemoveItem("$VersionOpt")
	
	StationDoc.ISMAILSTATIONERY = 1
	StationDoc.MAILSTATIONERYNAME = "Ihre Anfrage"
	StationDoc.SendTo = ""
	StationDoc.Subject = ""
	
	Call StationDoc.Save(True,True)
	'Msgbox "Please close the current note and go to draft view to access the new stationery named : Temp Stationery"
	Msgbox "Bitte schließen Sie jetzt diese Nachricht, öffnen Sie ''Werkzeuge'' - ''Vorlagen'', um zur Vorlage ''hre Anfrage''  zu gelangen."
	
End Sub

==============
~ 13 Domino-Server (9.0.1)
~ ca. 1.400 Notes-Clients (8.5.3 FP4)
~ ca. 600 Traveler Devices (iOS & Android)
~ dzt. 40 IBM-Connections-User
==============

Offline jo@chim

  • Aktives Mitglied
  • ***
  • Beiträge: 246
  • Geschlecht: Männlich
Re: Entwickler-Noob-Frage
« Antwort #1 am: 21.10.15 - 10:01:43 »
Vielleicht mit ner Hide-When-Formel ausblenden, wenn die Mail als Vorlage gespeichert wurde?
Gruss,
Achim
-------------------
IBM Certified Advanced Application Developer Lotus Notes and Domino 7

Offline Peter Klett

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.713
  • Geschlecht: Männlich
Re: Entwickler-Noob-Frage
« Antwort #2 am: 21.10.15 - 10:32:25 »
Hide-When halte ich für gefährlich, schließlich ist der Button dann immer noch in der Vorlage. Wenn die Vorlage benutzt wird, um einem Kunden eine Mail zu schicken, ist auch in dieser Mail der Button enthalten und wird ggf. dort angezeigt. Das wollt Ihr bestimmt nicht riskieren.

Lege die Vorlage in eine Datenbank, die für alle Mitarbeiter im Zugriff ist, und versende mit einer anderen Mail einen Button, der diese Vorlage aus der zentralen Vorlagendatenbank in die persönliche Maildatenbank kopiert, dann hast Du eine saubere Lösung

Offline typeOneg

  • Aktives Mitglied
  • ***
  • Beiträge: 204
  • Geschlecht: Männlich
    • My Band
Re: Entwickler-Noob-Frage
« Antwort #3 am: 21.10.15 - 13:33:04 »
Danke für eure Anregungen. Ich werde die Variante 2 mit der eigenen Vorlagen-DB jetzt weiterverfolgen.

==============
~ 13 Domino-Server (9.0.1)
~ ca. 1.400 Notes-Clients (8.5.3 FP4)
~ ca. 600 Traveler Devices (iOS & Android)
~ dzt. 40 IBM-Connections-User
==============

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz