Signaturverwaltung Exchange 2010
Hi,
ich bin auf der Suche nach einer professionellen Signatur- bzw. Disclaimerverwaltung für Exchange 2010 und Outlook 2010.
Ich habe auch schon einige gesehen, möchte aber hier noch einmal Fragen, welche Ihr einsetzt und für gut oder schlecht befinden könnt.
Mir gefällt das Disclaimer Tool von Exclaimer ganz gut. Was haltet Ihr davon?
VIele Grüße
ich bin auf der Suche nach einer professionellen Signatur- bzw. Disclaimerverwaltung für Exchange 2010 und Outlook 2010.
Ich habe auch schon einige gesehen, möchte aber hier noch einmal Fragen, welche Ihr einsetzt und für gut oder schlecht befinden könnt.
Mir gefällt das Disclaimer Tool von Exclaimer ganz gut. Was haltet Ihr davon?
VIele Grüße
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 145870
Url: https://administrator.de/contentid/145870
Ausgedruckt am: 22.11.2024 um 11:11 Uhr
23 Kommentare
Neuester Kommentar
Ich erstelle die Signaturen mittels VBScript.
Funktioniert super wenn alle Daten Ordentlich in LDAP eingetragen sind
Das script liest eben alle daten aus AD aus, also name, nachname, adresse, tel, mobil, fax, etc..... und erstellt aus diesen variablen direkt die Outlook signatur.
Kostet nix und ist sehr einfach zum integrieren.
Funktioniert super wenn alle Daten Ordentlich in LDAP eingetragen sind
Das script liest eben alle daten aus AD aus, also name, nachname, adresse, tel, mobil, fax, etc..... und erstellt aus diesen variablen direkt die Outlook signatur.
Kostet nix und ist sehr einfach zum integrieren.
Zitat von @oh2204:
Das Problem bei uns ist, das unsere Signatur Bilder und Grafiken enthalten soll.
Ich versuche es zwar den Verantworlichen auszureden aber ich glaube da ist nichts zu machen
Das Problem bei uns ist, das unsere Signatur Bilder und Grafiken enthalten soll.
Ich versuche es zwar den Verantworlichen auszureden aber ich glaube da ist nichts zu machen
genau deshalb vbscript
zB:
Set objSysInfo = CreateObject("ADSystemInfo")
strUser = objSysInfo.UserName
Set objUser = GetObject("LDAP://" & strUser)
strUsername = objUser.sAMAccountName
strName = objUser.FullName
strFirstname = objUser.Firstname
strLastname = objUser.Lastname
strTitle = objUser.Title
strDepartment = objUser.Department
strCompany = objUser.Company
strPhone = objUser.telephoneNumber
strMobil = objUser.mobile
strPLZ = objUser.postalcode
strLand = objUser.l
strStreet = objUser.streetAddress
strFAX = objUser.facsimileTelephoneNumber
strDepartment = objUser.department
strDesc = objUser.description
strGroup = LCase(Join(objUser.MemberOf))
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection
Set objEmailOptions = objWord.EmailOptions
Set objSignatureObject = objEmailOptions.EmailSignature
Set objSignatureEntries = objSignatureObject.EmailSignatureEntries
'Ab hier Signatur bearbeiten'
'schrift einrichten:
objSelection.Font.Name = "Arial"
objSelection.Font.Size = 10
'Text
objselection.typetext " Das ist meine signatur. Mein Name ist" & strFirstname & " " & strLastname
'Zeilenabstand
objSelection.Typetext(chr(11))
'Bild einfügen
objselection.InlineShapes.AddPicture("\\pfad\bild.gif")
'Speichern als Signatur und als default einrichten.
Set objSelection = objDoc.Range()
objSignatureEntries.Add "AD Signature", objSelection
objSignatureObject.NewMessageSignature = "AD Signature"
objSignatureObject.ReplyMessageSignature = "AD Signature"
objDoc.Saved = True
objWord.Quit
Als .vbs speichern und ausführen.
Da kann ich den OLX Disclaimer von Gangl empfehlen :
http://www.gangl.de/default.asp?redirect=Produkte/produkte.asp%3Fprod=O ...
http://www.gangl.de/default.asp?redirect=Produkte/produkte.asp%3Fprod=O ...
hallo,
dieser Script ist wirklich eine super Sache. Nur mit einem kleinen Schönheitsfehler, Alle ausgelesenen Daten erscheinen in EINER Zeile, es sieht leider nicht so doll aus, wie bekommt man diese unter einander? Name, Vorname, neue Zeile, Telefonnummer, neue Zeile ...,. Ausserdem wie kann ich dort einen freien Text eingeben mit Zeilenumbrüchen(für Events etc...)? Kenne mich leider mit VB-Scripting nicht aus, habe dies und das probiert aber es kommt immer irgendein Fehler.
Wäre super nett wenn jemand diesen Script um diese Sache ergänzen könnte. Dann wäre es einfach Perfekt!
Danke
powermax
dieser Script ist wirklich eine super Sache. Nur mit einem kleinen Schönheitsfehler, Alle ausgelesenen Daten erscheinen in EINER Zeile, es sieht leider nicht so doll aus, wie bekommt man diese unter einander? Name, Vorname, neue Zeile, Telefonnummer, neue Zeile ...,. Ausserdem wie kann ich dort einen freien Text eingeben mit Zeilenumbrüchen(für Events etc...)? Kenne mich leider mit VB-Scripting nicht aus, habe dies und das probiert aber es kommt immer irgendein Fehler.
Wäre super nett wenn jemand diesen Script um diese Sache ergänzen könnte. Dann wäre es einfach Perfekt!
Danke
powermax
Zitat von @godlie:
Hallo,
das ist nicht so schwer und zwar:
Hallo,
das ist nicht so schwer und zwar:
> objselection.typetext "Mein Name ist " & strFirstname & " " & strLastname
> 'Zeilenabstand
> objSelection.Typetext(chr(11))
> 'Telefon
> objselection.typetext "Meine Nummer ist " & strPhone
> 'Zeilenabstand
> objSelection.Typetext(chr(11))
> ......
>
fantastisch, es hat alles funktioniert, danke!!!
Super, es funkt, Daaaaankee!!!!
kannst du mir bitte erklären warum der Fehler aufgetaucht war? Nur so zum Verständniss. Denn die user sind ja in einer Gruppe.
Es sieht bei uns so aus: siehe Screenie
http://img441.imageshack.us/img441/6046/48081165.jpg
kannst du mir bitte erklären warum der Fehler aufgetaucht war? Nur so zum Verständniss. Denn die user sind ja in einer Gruppe.
Es sieht bei uns so aus: siehe Screenie
http://img441.imageshack.us/img441/6046/48081165.jpg
danke, aber was ist ein Array und was ist Join, was machen die Dinger genau? Wie sollte ich meine User organisieren damit ich keine Fehler bekomme? Ich dachte wenn ich die User unter Domäne => Gruppe packe ist doch auch okay.
Sorry wenn ich zu viele Fragen stelle, ich möchte es nicht nur irgendwie zum laufen bekommen sondern auch was dabei lernen.
Sorry wenn ich zu viele Fragen stelle, ich möchte es nicht nur irgendwie zum laufen bekommen sondern auch was dabei lernen.
Ist dieses Skript an ein Microsoft Office gebunden?
Wenn ich z.b. Set objWord = CreateObject("Word.Application") lese, ist damit Microsoft Word gemeint?
Wir haben ein Exchange 2007 mit Outlook 2010 im Einsatz, arbeiten allerdings mit OpenOffice. Habe bisher erfolgslos nach einer Signatur basierend auf dem Active Directory gesucht.
Wenn ich z.b. Set objWord = CreateObject("Word.Application") lese, ist damit Microsoft Word gemeint?
Wir haben ein Exchange 2007 mit Outlook 2010 im Einsatz, arbeiten allerdings mit OpenOffice. Habe bisher erfolgslos nach einer Signatur basierend auf dem Active Directory gesucht.
Hallo Leute,
erstmal danke für das tolle Skript funktioniert bei mir super, bis auf eine Kleinigkeit.
Ich hab in der Signatur die Homepage und Emailadresse als Hyperlink hinterlegt und dieser will sich einfach nicht formatieren lassen.
Der Hyperlink wird immer mit der Outlook Standard Schrift formatiert und nicht mit der im Skript vorgegebenen
Folgende Varianten habe ich versucht:
sowie mit objSelection
Ich habe auch versucht die Formatierung nach dem Hyperlink zu setzen, hat allerdings auch nicht funktioniert.
Hab schon ziemlich viel gesucht, allerdings noch keine passenden Lösung gefunden.
Vielleicht habt ihr eine Idee.
Danke
Philipp
erstmal danke für das tolle Skript funktioniert bei mir super, bis auf eine Kleinigkeit.
Ich hab in der Signatur die Homepage und Emailadresse als Hyperlink hinterlegt und dieser will sich einfach nicht formatieren lassen.
Der Hyperlink wird immer mit der Outlook Standard Schrift formatiert und nicht mit der im Skript vorgegebenen
Folgende Varianten habe ich versucht:
objSelection.Font.Bold = True
objselection.typetext "I "
objSelection.Font.Bold = False
objSelection.Font.Name = "Arial Narrow"
objSelection.Font.Size = "8,5"
objSelection.Font.Color = RGB(0,63,114)
Set objLink = objSelection.Hyperlinks.Add(objSelection.Range,"http://www.webpage.com",,"Our Webpage", "www.webpage.com")
sowie mit objSelection
objSelection.Font.Bold = True
objselection.typetext "E "
objSelection.Font.Bold = False
objSelection.Font.Name = "Arial Narrow"
objSelection.Font.Size = "8,5"
objSelection.Hyperlinks.Add objSelection.range, "mailto:" & strEmail, , , strEmail
Ich habe auch versucht die Formatierung nach dem Hyperlink zu setzen, hat allerdings auch nicht funktioniert.
Hab schon ziemlich viel gesucht, allerdings noch keine passenden Lösung gefunden.
Vielleicht habt ihr eine Idee.
Danke
Philipp