Temat: Podpis pod wiadomością
Bartłomiej S.:
Marek Kuchciak:
Standardowo definicja osobistego podpisu znajduje się w preferencjach bazy pocztowej użytkownika, czyli w pewnym dokumencie typu profil. Nie ma standardowego mechanizmu definiowania i personalizowania takich podpisów, ale umiejąc trochę programować da się napisać aplikację, która wszystkim takie spersonalizowane podpisy przygotuje i zapisze w profilach. Użytkownik może potem taki podpis zmodyfikować.
A z poziomu Domino Admin da się edytować podpis użytkownika? Czy jest on zapisany lokalnie i np. po zmianie stanowiska i ponownej konfiguracji trzeba podpis jeszcze raz ustawiać?
--
guzik
Cześć,
Nie ma narzędzia którym możesz to zrobić. Kawałek kodu w LS może jednak to załatwić. Poniżej masz przykład (niekompletny, który wykorzystałem do tworzenia wiadomości przez agenta) jak wyłaczyć stopkę użytkownikowi, potem wstawić zawartość maila, a następnie jak ją włączyć sprawdzając jaki rodzaj podpisu użytkownik ma zdefiniowany. W podobny sposób możesz odwołać się do zawartości stopki itd.
MailServer = s.GetEnvironmentString( "MailServer",True)
MailFile = s.GetEnvironmentString( "MailFile",True)
Dim mailDB As New NotesDatabase( MailServer, MailFile )
Set baza = s.CurrentDatabase
Set docProfile = maildb.GetProfileDocument("CalendarProfile")
'Disable signature in users mail profile
strProfileEnableSignature = docProfile.EnableSignature(0)
If strProfileEnableSignature = "1" Then
docProfile.EnableSignature = ""
Call docProfile.Save(True,False)
End If
If sigOption = "1" Then 'text
Call mailUiDoc.FieldAppendText("Body", docProfile.Signature_1(0))
Elseif sigOption = "2" Then 'file
Dim filePath, extension, fileFilter As String
filePath = docProfile.Signature_2(0)
extension = Strrightback(filePath, ".")
Select Case extension
Case "jpeg", "jpg":
fileFilter = "JPEG Image"
Case "gif":
fileFilter = "GIF Image"
Case "bmp":
fileFilter = "BMP Image"
Case "htm", "html":
fileFilter ="HTML File"
Case "txt":
fileFilter ="ASCII Text"
End Select
Call mailUiDoc.Import(fileFilter,filePath)
End If
Pozdrawiam
Marcin Matkowski edytował(a) ten post dnia 17.02.10 o godzinie 10:28