{"id":2505,"date":"2010-07-15T22:19:57","date_gmt":"2010-07-15T18:19:57","guid":{"rendered":"http:\/\/msbro.ru\/?p=2505"},"modified":"2010-07-15T22:19:57","modified_gmt":"2010-07-15T18:19:57","slug":"skript-formiruyushhijj-podpis-sotrudnikam-na-osnovanii-atributov-active-directory","status":"publish","type":"post","link":"https:\/\/msbro.ru\/index.php\/archives\/2505","title":{"rendered":"\u0421\u043a\u0440\u0438\u043f\u0442, \u0444\u043e\u0440\u043c\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u043f\u043e\u0434\u043f\u0438\u0441\u044c \u0441\u043e\u0442\u0440\u0443\u0434\u043d\u0438\u043a\u0430\u043c \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0438 \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 Active Directory."},"content":{"rendered":"<p>\u0421\u043a\u0440\u0438\u043f\u0442, \u0444\u043e\u0440\u043c\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u043f\u043e\u0434\u043f\u0438\u0441\u044c \u0441\u043e\u0442\u0440\u0443\u0434\u043d\u0438\u043a\u0430\u043c \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0438 \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 Active Directory. \u0422\u0435\u0441\u0442\u0438\u0440\u043e\u0432\u0430\u043b\u0441\u044f \u043d\u0430 Outlook 2003\/2007.<\/p>\n<p><!--more--><\/p>\n<pre>On Error Resume Next\r\n\r\nSet objSysInfo = CreateObject(\"ADSystemInfo\")\r\n\r\nstrUser = objSysInfo.UserName\r\nSet objUser = GetObject(\"LDAP:\/\/\" &amp; strUser)\r\n\r\nstrZpov = \"\u0421 \u0443\u0432\u0430\u0436\u0435\u043d\u0438\u0435\u043c, \"\r\nstrDev =\r\n\r\n\"---------------------------------------------------------------------------------------\r\n\r\n----------------------------------------------------------------------------------------\r\n\r\n----------------------------------------------------------------------------------------\r\n\r\n-----------------------------\"\r\nstrPostIndex = ObjUser.postalCode\r\nstrName = objUser.FullName\r\nstrTitle = objUser.Title\r\nstrDepartment = objUser.Department\r\nstrCompany = objUser.Company\r\nstrPhone = objUser.telephoneNumber\r\nstrMob= objUser.Mobile\r\nstrweb = \"www.domain.com\"\r\nstrgorod = objuser.l\r\nstrstreet = objuser.streetAddress\r\nstrfax = objuser.facsimileTelephoneNumber\r\nstrIntPhone = objuser.ipPhone\r\nstrEmail = objuser.mail\r\nstrLogo = \"\\\\servername\\logo.gif\"\r\n\r\nSet objWord = CreateObject(\"Word.Application\")\r\nSet objDoc = objWord.Documents.Add()\r\nSet objSelection = objWord.Selection\r\nSet objEmailOptions = objWord.EmailOptions\r\nSet objSignatureObject = objEmailOptions.EmailSignature\r\nSet objSignatureEntries = objSignatureObject.EmailSignatureEntries\r\n\r\nobjSelection.Font.Name = \"Garamond\"\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.InlineShapes.AddPicture(strLogo)\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText strZpov\r\nobjSelection.TypeText strName\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText strTitle\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText strCompany\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText \"\u0442\u0435\u043b: \" &amp; strPhone\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText \"\u043c\u043e\u0431: \" &amp; strMob\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText \"\u0444\u0430\u043a\u0441: \" &amp; strfax\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.TypeText \"Email: \" &amp; strEmail\r\nobjSelection.TypeText CHR(11)\r\nobjSelection.Hyperlinks.Add objSelection.Range, strWeb, \"\", \"\", strWeb\r\n\r\nSet objSelection = objDoc.Range()\r\n\r\nobjSignatureEntries.Add \"AD Signature\", objSelection\r\nobjSignatureObject.NewMessageSignature = \"AD Signature\"\r\nobjSignatureObject.ReplyMessageSignature = \"AD Signature\"\r\n\r\nobjDoc.Saved = True\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u0421\u043a\u0440\u0438\u043f\u0442, \u0444\u043e\u0440\u043c\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u043f\u043e\u0434\u043f\u0438\u0441\u044c \u0441\u043e\u0442\u0440\u0443\u0434\u043d\u0438\u043a\u0430\u043c \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0438 \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 Active Directory. \u0422\u0435\u0441\u0442\u0438\u0440\u043e\u0432\u0430\u043b\u0441\u044f \u043d\u0430 Outlook 2003\/2007.<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[10],"tags":[],"class_list":["post-2505","post","type-post","status-publish","format-standard","hentry","category-scripts"],"_links":{"self":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/2505"}],"collection":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/comments?post=2505"}],"version-history":[{"count":0,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/2505\/revisions"}],"wp:attachment":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/media?parent=2505"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/categories?post=2505"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/tags?post=2505"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}<!-- WP Super Cache is installed but broken. The constant WPCACHEHOME must be set in the file wp-config.php and point at the WP Super Cache plugin directory. -->