Signature exchange (pour les gars de TI i guess)

Setak

Setak

Well-known member
Je suis entrain de regardé pour faire des signatures harmonisé pour la compagnie, en même temps cela me permettra de push des signatures sur les courriels envoyé par cellulaire.
Je suis aucunement un gars de TI et j'ai presque aucune base en programmation a part du gossase a gauche et a droite sur Linux et quelque ''notion'' de HTML du genre je comprend un peu ce que je vois a force de jouer dans quelque truc mais sans plus.

Bon voilà, j'ai installer Exclaimer (30 jour d'essais) pour voir ce que ce programme pourrais faire pour moi. Je veut utilisé des templates et crée une signature qui utilisera le active directory de Exchange pour update le tout. A date c'est plutôt archaïque comme programme (for fuck sake le logo instagram est même pas préload dans les templates)
J'ai pas encore jouer plusieurs heure dedans mais a date il ne fait pas trop mon affaire.

J'aimerai bien trouvé un programme beaucoup plus user friendly sur le design. Si je compare par exemple a ceci : https://www.mail-signatures.com/signature-generator/#/user-data
Super facile et très user friendly, Par contre si je load des signature dememe direct dans exchange sa me donne pas la facilité de edit et exemple mettre des rules de temps pour des banners , ou des groupes de personne X. (Je pense regardé le programme de CodeTwo aussi c'étais mon premier choix mais notre gars de TI (Externe) voulais que je test exclaimer)

Avez-vous des application préférer ?
 
Setak said:
Je suis entrain de regardé pour faire des signatures harmonisé pour la compagnie, en même temps cela me permettra de push des signatures sur les courriels envoyé par cellulaire.
Je suis aucunement un gars de TI et j'ai presque aucune base en programmation a part du gossase a gauche et a droite sur Linux et quelque ''notion'' de HTML du genre je comprend un peu ce que je vois a force de jouer dans quelque truc mais sans plus.

Bon voilà, j'ai installer Exclaimer (30 jour d'essais) pour voir ce que ce programme pourrais faire pour moi. Je veut utilisé des templates et crée une signature qui utilisera le active directory de Exchange pour update le tout. A date c'est plutôt archaïque comme programme (for fuck sake le logo instagram est même pas préload dans les templates)
J'ai pas encore jouer plusieurs heure dedans mais a date il ne fait pas trop mon affaire.

J'aimerai bien trouvé un programme beaucoup plus user friendly sur le design. Si je compare par exemple a ceci : https://www.mail-signatures.com/signature-generator/#/user-data
Super facile et très user friendly, Par contre si je load des signature dememe direct dans exchange sa me donne pas la facilité de edit et exemple mettre des rules de temps pour des banners , ou des groupes de personne X. (Je pense regardé le programme de CodeTwo aussi c'étais mon premier choix mais notre gars de TI (Externe) voulais que je test exclaimer)

Avez-vous des application préférer ?
Click to expand...

Fais le directement dans ton connecteur Exchange avec une regle qui ajoute la signature uniquement si tes courriels sont envoyes a l'externe ou selon quel groupe de securite AD envoie le courriel. As tu exchange online ou on premises?
 
Riffo said:
Ecris un VBScript
Click to expand...

This.


Mine :

Set objUser = CreateObject("WScript.Network")
userName = objUser.UserName
domainName = objUser.UserDomain

On Error Resume Next
FUNCTION GetUserDN(BYVAL UN, BYVAL DN)
Set ObjTrans = CreateObject("NameTranslate")
objTrans.init 1, DN
objTrans.set 3, DN & "" & UN
strUserDN = objTrans.Get(1)
GetUserDN = strUserDN
END FUNCTION


Set objLDAPUser = GetObject("LDAP://" & GetUserDN(userName,domainName))

'Variables
Dim objFSO, objWsh, appDataPath, pathToCopyTo, htmlFile, htmlFilePath
Set objWsh = CreateObject("WScript.Shell")
appDataPath = objWsh.ExpandEnvironmentStrings("%APPDATA%")
pathToCopyTo = appDataPath & "\Microsoft\Signatures"


'Verifie si le repertoire existe
'ISinon il le crée
Set objFSO = CreateObject("Scripting.FileSystemObject")
If not objFSO.FolderExists(pathToCopyTo) Then
Set objFolder = objFSO.CreateFolder(pathToCopyTo)
End If

'Copie des images
Set FileToCopy = objFSO.GetFile("\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.jpg")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\phone.png")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\mail.png")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\www.png")
FileToCopy.Copy (pathToCopyTo)


'Creation de la version signature : sera utiliser avec le script de login
htmlFilePath = pathToCopyTo & "1"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("version 1")
htmlfile.close


'Creation de la signature htm
htmlFilePath = pathToCopyTo & "NewMail.htm"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HEAD>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<meta charset=""UTF-8"" /></HEAD>")
htmlfile.WriteLine("<table width=""600"" cellspacing=""0"" cellpadding=""0"" ><tr><td>")
htmlfile.WriteLine("<table width=""600"" height=""80"" cellspacing=""0"" cellpadding=""0"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine("<td width=""420"" height=""80""><table cellpadding=""0"" cellspacing=""0"" bgcolor=""#ffffff"" style=""font-size:12px;"" height=""80"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"" style=""font-size:10px;""><table width=""180"" cellpadding=""0"" cellspacing=""0"" style=""font-family:Arial, Helvetica, serif;color:#000000;font-size:10px;"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\mail.jpg"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.mail &"</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\Telephone.png"" width=""20"" height=""19"" /></td>")
IF objLDAPUser.telephoneNumber = "" THEN
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> +39 1122345</strong></td>")
ELSE
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.telephoneNumber &"</strong></td>")
END IF
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.jpg"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> www.proco.ca</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </table></td>")
htmlfile.WriteLine(" <td width=""240"" style=""font-size:15px;""><table width=""240"" cellpadding=""0"" cellspacing=""0"">")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:18px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &" </td></tr>")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:13px;color:#4d4d4d;font-family:Georgia, 'Times New Roman', Times, serif;"">"& objLDAPUser.Title & " </td></tr>")
htmlfile.WriteLine(" </table>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td>")
htmlfile.WriteLine("<td width=""150"" height=""80"" bgcolor=""#ffffff""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.png"" width=""180"" height=""80"" /></td>")
htmlfile.WriteLine("</tr></table>")
htmlfile.WriteLine("<table cellspacing=""0"" cellpadding=""10"" width=""600"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine(" <td style=""font-size:9px; text-align:justify; font-family:Verdana,Geneva,serif;"">Avis de confidentialité - Cette communication est réservée à l'usage du destinataire nommé et sa teneur est confidentielle. Tout autre lecteur, hormis une personne mandatée par ledit destinataire, devra considérer par la présente que sa diffusion, sous toutes les formes, est strictement interdite. La personne qui reçoit cette communication par erreur est priée d'avertir immédiatement notre réception ou l'envoyeur.</td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td></tr></table>")

htmlfile.close

'creation de la signature de reply en htm
htmlFilePath = pathToCopyTo & "ReplyMail.htm"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HTML><HEAD>")
htmlfile.WriteLine("<meta charset=""UTF-8"" />")
htmlfile.WriteLine("</HEAD><BODY>")
htmlfile.WriteLine("<table width=""200"" cellspacing=""0"" cellpadding=""0"">")
htmlfile.WriteLine("<tr><td align=""left"" valign=""top""><span style=""font-size:15px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &"</span><br/>")
htmlfile.WriteLine("<span style=""font-size:12px;color:#4d4d4d;font-family: Arial, Helvetica, serif;"">"& objLDAPUser.Title & "</span></td></tr></table></td>")
htmlfile.WriteLine("</tr></table></body></html>")
htmlfile.close

'creation de la signature dpour OWA
htmlFilePath = pathToCopyTo & "OWASignature.html"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HEAD>")
htmlfile.WriteLine("<meta charset=""UTF-8"" /></HEAD>")
htmlfile.WriteLine("<table width=""600"" cellspacing=""0"" cellpadding=""0"" ><tr><td>")
htmlfile.WriteLine("<table width=""600"" height=""80"" cellspacing=""0"" cellpadding=""0"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine("<td width=""420"" height=""80""><table cellpadding=""0"" cellspacing=""0"" bgcolor=""#ffffff"" style=""font-size:12px;"" height=""80"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"" style=""font-size:10px;""><table width=""180"" cellpadding=""0"" cellspacing=""0"" style=""font-family:Arial, Helvetica, serif;color:#000000;font-size:10px;"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/mail.png"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.mail &"</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/phone.png"" width=""20"" height=""19"" /></td>")
IF objLDAPUser.telephoneNumber = "" THEN
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> +39 1122345</strong></td>")
ELSE
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.telephoneNumber &"</strong></td>")
END IF
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/www.png"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> www.juricalleri.net</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </table></td>")
htmlfile.WriteLine(" <td width=""240"" style=""font-size:15px;""><table width=""240"" cellpadding=""0"" cellspacing=""0"">")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:18px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &" </td></tr>")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:13px;color:#4d4d4d;font-family:Arial, Helvetica, serif;"">"& objLDAPUser.Title & " </td></tr>")
htmlfile.WriteLine(" </table>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td>")
htmlfile.WriteLine("<td width=""180"" height=""80"" bgcolor=""#ffffff""><img src=""http://server.domain/images/logo.png"" width=""180"" height=""80"" /></td>")
htmlfile.WriteLine("</tr></table>")
htmlfile.WriteLine("<table cellspacing=""0"" cellpadding=""10"" width=""600"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine(" <td style=""font-size:9px; text-align:justify; font-family:Verdana,Geneva,serif;"">Avis de confidentialité - Cette communication est réservée à l'usage du destinataire nommé et sa teneur est confidentielle. Tout autre lecteur, hormis une personne mandatée par ledit destinataire, devra considérer par la présente que sa diffusion, sous toutes les formes, est strictement interdite. La personne qui reçoit cette communication par erreur est priée d'avertir immédiatement notre réception ou l'envoyeur. </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td></tr></table>")

htmlfile.close


Set objWord = CreateObject("Word.Application")
objWord.Visible = False

Set objEmailOptions = objWord.EmailOptions
Set objSignatureObject = objEmailOptions.EmailSignature

objSignatureObject.NewMessageSignature = "NewMail"
objSignatureObject.ReplyMessageSignature = "NewMail"

objWord.Quit 0
Click to expand...


je l'ai vollé sur internats :D
 
paradigmqc said:
This.


Mine :


Set objUser = CreateObject("WScript.Network")
userName = objUser.UserName
domainName = objUser.UserDomain

On Error Resume Next
FUNCTION GetUserDN(BYVAL UN, BYVAL DN)
Set ObjTrans = CreateObject("NameTranslate")
objTrans.init 1, DN
objTrans.set 3, DN & "" & UN
strUserDN = objTrans.Get(1)
GetUserDN = strUserDN
END FUNCTION


Set objLDAPUser = GetObject("LDAP://" & GetUserDN(userName,domainName))

'Variables
Dim objFSO, objWsh, appDataPath, pathToCopyTo, htmlFile, htmlFilePath
Set objWsh = CreateObject("WScript.Shell")
appDataPath = objWsh.ExpandEnvironmentStrings("%APPDATA%")
pathToCopyTo = appDataPath & "\Microsoft\Signatures"


'Verifie si le repertoire existe
'ISinon il le crée
Set objFSO = CreateObject("Scripting.FileSystemObject")
If not objFSO.FolderExists(pathToCopyTo) Then
Set objFolder = objFSO.CreateFolder(pathToCopyTo)
End If

'Copie des images
Set FileToCopy = objFSO.GetFile("\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.jpg")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\phone.pn g")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\mail.png ")
FileToCopy.Copy (pathToCopyTo)
Set FileToCopy = objFSO.GetFile("\\SERVER\Signature\Images\www.png" )
FileToCopy.Copy (pathToCopyTo)


'Creation de la version signature : sera utiliser avec le script de login
htmlFilePath = pathToCopyTo & "1"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("version 1")
htmlfile.close


'Creation de la signature htm
htmlFilePath = pathToCopyTo & "NewMail.htm"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HEAD>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<br>")
htmlfile.WriteLine("<meta charset=""UTF-8"" /></HEAD>")
htmlfile.WriteLine("<table width=""600"" cellspacing=""0"" cellpadding=""0"" ><tr><td>")
htmlfile.WriteLine("<table width=""600"" height=""80"" cellspacing=""0"" cellpadding=""0"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine("<td width=""420"" height=""80""><table cellpadding=""0"" cellspacing=""0"" bgcolor=""#ffffff"" style=""font-size:12px;"" height=""80"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"" style=""font-size:10px;""><table width=""180"" cellpadding=""0"" cellspacing=""0"" style=""font-family:Arial, Helvetica, serif;color:#000000;font-size:10px;"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\mail.jpg"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.mail &"</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\Telephone.png"" width=""20"" height=""19"" /></td>")
IF objLDAPUser.telephoneNumber = "" THEN
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> +39 1122345</strong></td>")
ELSE
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.telephoneNumber &"</strong></td>")
END IF
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.jpg"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> www.proco.ca</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </table></td>")
htmlfile.WriteLine(" <td width=""240"" style=""font-size:15px;""><table width=""240"" cellpadding=""0"" cellspacing=""0"">")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:18px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &" </td></tr>")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:13px;color:#4d4d4d;font-family:Georgia, 'Times New Roman', Times, serif;"">"& objLDAPUser.Title & " </td></tr>")
htmlfile.WriteLine(" </table>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td>")
htmlfile.WriteLine("<td width=""150"" height=""80"" bgcolor=""#ffffff""><img src=""\\stn-servdata\Partage\InterDep\Logo Réseau\Logo Proco 2013\signature.png"" width=""180"" height=""80"" /></td>")
htmlfile.WriteLine("</tr></table>")
htmlfile.WriteLine("<table cellspacing=""0"" cellpadding=""10"" width=""600"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine(" <td style=""font-size:9px; text-align:justify; font-family:Verdana,Geneva,serif;"">Avis de confidentialité - Cette communication est réservée à l'usage du destinataire nommé et sa teneur est confidentielle. Tout autre lecteur, hormis une personne mandatée par ledit destinataire, devra considérer par la présente que sa diffusion, sous toutes les formes, est strictement interdite. La personne qui reçoit cette communication par erreur est priée d'avertir immédiatement notre réception ou l'envoyeur.</td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td></tr></table>")

htmlfile.close

'creation de la signature de reply en htm
htmlFilePath = pathToCopyTo & "ReplyMail.htm"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HTML><HEAD>")
htmlfile.WriteLine("<meta charset=""UTF-8"" />")
htmlfile.WriteLine("</HEAD><BODY>")
htmlfile.WriteLine("<table width=""200"" cellspacing=""0"" cellpadding=""0"">")
htmlfile.WriteLine("<tr><td align=""left"" valign=""top""><span style=""font-size:15px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &"</span><br/>")
htmlfile.WriteLine("<span style=""font-size:12px;color:#4d4d4d;font-family: Arial, Helvetica, serif;"">"& objLDAPUser.Title & "</span></td></tr></table></td>")
htmlfile.WriteLine("</tr></table></body></html>")
htmlfile.close

'creation de la signature dpour OWA
htmlFilePath = pathToCopyTo & "OWASignature.html"
Set htmlFile = objFSO.CreateTextFile(htmlFilePath, TRUE)
htmlfile.WriteLine("<HEAD>")
htmlfile.WriteLine("<meta charset=""UTF-8"" /></HEAD>")
htmlfile.WriteLine("<table width=""600"" cellspacing=""0"" cellpadding=""0"" ><tr><td>")
htmlfile.WriteLine("<table width=""600"" height=""80"" cellspacing=""0"" cellpadding=""0"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine("<td width=""420"" height=""80""><table cellpadding=""0"" cellspacing=""0"" bgcolor=""#ffffff"" style=""font-size:12px;"" height=""80"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"" style=""font-size:10px;""><table width=""180"" cellpadding=""0"" cellspacing=""0"" style=""font-family:Arial, Helvetica, serif;color:#000000;font-size:10px;"">")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/mail.png"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.mail &"</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/phone.png"" width=""20"" height=""19"" /></td>")
IF objLDAPUser.telephoneNumber = "" THEN
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> +39 1122345</strong></td>")
ELSE
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> "& objLDAPUser.telephoneNumber &"</strong></td>")
END IF
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" <tr>")
htmlfile.WriteLine(" <td width=""180"">")
htmlfile.WriteLine(" <td width=""21"" valign=""middle""><img src=""http://server.domain/images/www.png"" width=""20"" height=""19"" /></td>")
htmlfile.WriteLine(" <td width=""159"" valign=""middle""><strong> www.juricalleri.ne t</strong></td>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </tr>")
htmlfile.WriteLine(" </table></td>")
htmlfile.WriteLine(" <td width=""240"" style=""font-size:15px;""><table width=""240"" cellpadding=""0"" cellspacing=""0"">")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:18px;color:#000;font-family:Georgia, 'Times New Roman', Times, serif;"">"& ExtAttrib1Str & objLDAPUser.FirstName &" "& objLDAPUser.LastName &" </td></tr>")
htmlfile.WriteLine(" <tr><td width=""191"" align=""center"" valign=""top"" style=""font-size:13px;color:#4d4d4d;font-family:Arial, Helvetica, serif;"">"& objLDAPUser.Title & " </td></tr>")
htmlfile.WriteLine(" </table>")
htmlfile.WriteLine(" </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td>")
htmlfile.WriteLine("<td width=""180"" height=""80"" bgcolor=""#ffffff""><img src=""http://server.domain/images/logo.png"" width=""180"" height=""80"" /></td>")
htmlfile.WriteLine("</tr></table>")
htmlfile.WriteLine("<table cellspacing=""0"" cellpadding=""10"" width=""600"" >")
htmlfile.WriteLine("<tr>")
htmlfile.WriteLine(" <td style=""font-size:9px; text-align:justify; font-family:Verdana,Geneva,serif;"">Avis de confidentialité - Cette communication est réservée à l'usage du destinataire nommé et sa teneur est confidentielle. Tout autre lecteur, hormis une personne mandatée par ledit destinataire, devra considérer par la présente que sa diffusion, sous toutes les formes, est strictement interdite. La personne qui reçoit cette communication par erreur est priée d'avertir immédiatement notre réception ou l'envoyeur. </td>")
htmlfile.WriteLine("</tr>")
htmlfile.WriteLine("</table></td></tr></table>")

htmlfile.close


Set objWord = CreateObject("Word.Application")
objWord.Visible = False

Set objEmailOptions = objWord.EmailOptions
Set objSignatureObject = objEmailOptions.EmailSignature

objSignatureObject.NewMessageSignature = "NewMail"
objSignatureObject.ReplyMessageSignature = "NewMail"

objWord.Quit 0


je l'ai vollé sur internats :D
Click to expand...


htmlfile.WriteLine("</TL;DR>")
 
Lolll.. sa parait, pourquoi pas juste bâtir ta signature dans word, export en html, grab le html du document pis html.writeline(fso.read(doc.path)) au-lieu de 8000 ligne html.writeline()
 
bi0hazard said:
Lolll.. sa parait, pourquoi pas juste bâtir ta signature dans word, export en html, grab le html du document pis html.writeline(fso.read(doc.path)) au-lieu de 8000 ligne html.writeline()
Click to expand...

hahahahah aucune idée de quoi tu parle, je programme pas pantoute :D

Ok un peu en batch lel.
 
bi0hazard said:
Lolll.. sa parait, pourquoi pas juste bâtir ta signature dans word, export en html, grab le html du document pis html.writeline(fso.read(doc.path)) au-lieu de 8000 ligne html.writeline()
Click to expand...

je connais rien a la programmation mais je trouvais sa intense en criss pour une signature justement.
 
paradigmqc said:
hahahha mais ça marche A1 pis c'est pas demandant au système (anyway tu l'execute juste une fois)
Click to expand...
Là dessus t'as raison. En programmation, whatever floats your boat, mais c'est comme regarder une job de soudure toute crotté.

Sent from my Pixel using Tapatalk
 
You must log in or register to reply here.
Back
Top