Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
Solved

Lotus Notes signature file

Posted on 2013-11-13
7
580 Views
Last Modified: 2013-11-19
Hi

I have a script that has created an HTML signature file (signature.htm) on each users "d:\emailsig
folder".  I need help within a script that I will email to all users which will load into Lotus notes as their permament signature.
I'm using LN 8.5.1

Thanks
0
Comment
Question by:Bianchi928
  • 4
  • 2
7 Comments
 
LVL 46

Expert Comment

by:Sjef Bosman
ID: 39647281
It'll take you (us) quite some time to develop this completely error-free. Wouldn't it be better, more flexible, faster, etc. to use an off-the-shelf solution, instead of reinventing yet another wheel? I saw there's one by Whitsell Consultancy (no link, sorry), and there's this one: http://www.justfordomino.com/products.nsf/productid/85LKHJ?opendocument
0
 
LVL 1

Expert Comment

by:Hans Holt, Ph.D.
ID: 39648720
There is a Danish version witch I have used both with Windows and Linux Domino servers:

http://www.sander-software.dk/Websites/SS/webdk.nsf/vInfoID/RSHN-7WUR9V?OpenDocument

Google may help you translate the documentation.
0
 

Accepted Solution

by:
Bianchi928 earned 0 total points
ID: 39650584
I've got it and it's working

Set NotesSession = CreateObject("Notes.Notessession")
Set maildb= NotesSession.GetDatabase("", "")

Call Maildb.OpenMail

Set mailprof = maildb.GetProfileDocument("CalendarProfile")


'Remove any existing signature field from CalendarProfile
'Dim itmSig As NotesItem
Set itmSig = mailprof.GetFirstItem("Signature_Rich")
If Not itmSig Is Nothing Then mailprof.RemoveItem("Signature_Rich")

Call mailprof.ReplaceItemValue("EnableSignature", "1")
Call mailprof.ReplaceItemValue("SignatureOption", "2")
Call mailprof.ReplaceItemValue("Signature_1", "")
Call mailprof.ReplaceItemValue("Signature_2", "D:\emailsig\signature.htm")
Call mailprof.ReplaceItemValue("Signature", "D:\emailsig\signature.htm")
Call mailprof.ComputeWithForm(True, False)
Call mailprof.Save(True, False)
0
Networking for the Cloud Era

Join Microsoft and Riverbed for a discussion and demonstration of enhancements to SteelConnect:
-One-click orchestration and cloud connectivity in Azure environments
-Tight integration of SD-WAN and WAN optimization capabilities
-Scalability and resiliency equal to a data center

 

Author Comment

by:Bianchi928
ID: 39650586
I did my reaserach and ame up with the solution
0
 
LVL 46

Expert Comment

by:Sjef Bosman
ID: 39650598
That's.... not bad, not bad at all!  :-)
0
 

Author Comment

by:Bianchi928
ID: 39654907
sjef_bosman.

Thanks
0
 

Author Closing Comment

by:Bianchi928
ID: 39658944
Happy with that
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Need to Modify a Script I found 5 108
Problem to open text file 11 128
excel VBA - clear duplicates not working 11 37
VBA Vbscript  Issue 9 26
In this article we want to have a look at the directory attributes which are used by Microsoft to store the so called Security Identifiers (SID). These SIDs plays an important role in delegating and granting permissions and in authentication of trus…
Well hello again!  Glad to see you've made it this far without giving up.  In this, the fourth installment of my popular series, I'm going to cover functions and subroutines, what they are, and why they are useful.  Just in case you stumbled onto th…

828 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question