Avtopodpis a kilátások a Domain Users

előző ◈ a következő

Örököltem a domain volt egy csomó felesleges és kevés hasznos dolgokat. Egy nem történik véleményem PSU - ez avtopodpis az Outlook domain felhasználók.

On Error Resume Next

Állítsa objSysInfo = CreateObject ( «ADSystemInfo»)

strUser = objSysInfo.UserName
Állítsa objUser = GetObject ( «LDAP: //» strUser)

strZpov = «Üdvözlettel”
strDev = «________________________________________________________________________»
strPostIndex = ObjUser.postalCode
strName = objUser.FullName
strTitle = objUser.Title
strDepartment = objUser.Department
strCompany = objUser.Company
strPhone = objUser.telephoneNumber
strweb = objuser.wWWHomePage
strstreet = objuser.streetAddress
strfax = objuser.facsimileTelephoneNumber
strIntPhone = objuser.mobile
strEmail = objuser.mail
strotdel = objUser.extensionAttribute3
strLogo = «\\ utat az képet a hálózat \ logo-office-1.jpg»

Állítsa objWord = CreateObject ( «Word.Application»)
Set objDoc = objWord.Documents.Add ()
Állítsa objSelection = objWord.Selection
Állítsa objEmailOptions = objWord.EmailOptions
Állítsa objSignatureObject = objEmailOptions.EmailSignature
Állítsa objSignatureEntries = objSignatureObject.EmailSignatureEntries
Set objRange = objDoc.Range ()

Set objTable = objDoc.Tables (1)

objTable.Rows (1) lehetőségre.Válassza
objSelection.Cells.Merge
objTable.Cell (2, 1) lehetőségre.Válassza
objTable.Cell (2, 1) .Width = 70
objSelection.TypeText CHR (11)
objTable.Cell (2, 1) .text = objSelection.InlineShapes.AddPicture (strLogo)
objTable.Cell (2, 2) lehetőségre.Válassza
objTable.Cell (2, 2) .Width = 400
objselection.font.color = RGB (11, 32, 77)
objSelection.TypeText CHR (11)
'#'
objSelection.ParagraphFormat.Space1
objselection.font.color = RGB (11, 32, 77)
objSelection.Font.Name = «Arial Narrow»
objSelection.Font.Size = «11»
objSelection.TypeText strZpov
objSelection.TypeText CHR (11)
objSelection.TypeText strName
objSelection.TypeText CHR (11)
objSelection.TypeText strTitle
objSelection.TypeText CHR (11)
if (strDepartment<>»») Ezután objSelection.TypeText strDepartment
if (strDepartment<>»») Ezután objSelection.TypeText CHR (11)
if (strotdel<>»») Ezután objSelection.TypeText strotdel
if (strotdel<>»») Ezután objSelection.TypeText CHR (11)
objSelection.TypeText strCompany
objSelection.TypeText CHR (11)
objSelection.TypeText «Tel. " strPhone
if (strintPhone<>»») Ezután objSelection.TypeText CHR (11) „Mob. " strintPhone
objSelection.TypeText CHR (11)
objselection.font.color = RGB (0, 0, 255)
objSelection.Hyperlinks.Add objSelection.range «mailto:» strEmail. strEmail
objSelection.TypeText CHR (11)
objSelection.Hyperlinks.Add objSelection.Range, strWeb «», «», strWeb
objSelection.TypeText CHR (11)
objselection.font.color = RGB (0, 0, 0)
objSelection.TypeText strPostIndex strgorod strstreet
'#'
Set objSelection = objDoc.Range ()
objSignatureEntries.Add «AD Signature», objSelection
objSignatureObject.NewMessageSignature = «AD Signature»
objSignatureObject.ReplyMessageSignature = «AD Signature»

objDoc.Saved = True
objDoc.Close
objWord.Quit

Nézzük, mi a felelős azért, ami ebben a script.

On Error Resume Next

Állítsa objSysInfo = CreateObject ( «ADSystemInfo»)

strUser = objSysInfo.UserName
Állítsa objUser = GetObject ( «LDAP: //» strUser)

strZpov = «Üdvözlettel”
strDev = «____________________________________________________________________»
strPostIndex = ObjUser.postalCode
strName = objUser.FullName
strTitle = objUser.Title
strDepartment = objUser.Department
strCompany = objUser.Company
strPhone = objUser.telephoneNumber
strweb = objuser.wWWHomePage
strstreet = objuser.streetAddress
strfax = objuser.facsimileTelephoneNumber
strIntPhone = objuser.mobile
strEmail = objuser.mail
strotdel = objUser.extensionAttribute3
strLogo = «\\ utat az képet a hálózat \ logo-office-1.jpg»

Set objTable = objDoc.Tables (1)

Egység, ami egy táblázat, amelyben két oszlopot és egy sorban. szöveg színe és mérete:

objTable.Cell (2, 1) lehetőségre.Válassza
objTable.Cell (2, 1) .Width = 70
objSelection.TypeText CHR (11)
objTable.Cell (2, 1) .text = objSelection.InlineShapes.AddPicture (strLogo)
objTable.Cell (2, 2) lehetőségre.Válassza
objTable.Cell (2, 2) .Width = 400
objselection.font.color = RGB (11, 32, 77)
objSelection.TypeText CHR (11)

Egység, amely megjeleníti információkat a blokkillesztés:

objSelection.ParagraphFormat.Space1
objselection.font.color = RGB (11, 32, 77)
objSelection.Font.Name = «Arial Narrow»
objSelection.Font.Size = «11»
objSelection.TypeText strZpov
objSelection.TypeText CHR (11)
objSelection.TypeText strName
objSelection.TypeText CHR (11)
objSelection.TypeText strTitle
objSelection.TypeText CHR (11)
if (strDepartment<>»») Ezután objSelection.TypeText strDepartment
if (strDepartment<>»») Ezután objSelection.TypeText CHR (11)
if (strotdel<>»») Ezután objSelection.TypeText strotdel
if (strotdel<>»») Ezután objSelection.TypeText CHR (11)
objSelection.TypeText strCompany
objSelection.TypeText CHR (11)
objSelection.TypeText «Tel. " strPhone
if (strintPhone<>»») Ezután objSelection.TypeText CHR (11) „Mob. " strintPhone
objSelection.TypeText CHR (11)
objselection.font.color = RGB (0, 0, 255)
objSelection.Hyperlinks.Add objSelection.range «mailto:» strEmail. strEmail
objSelection.TypeText CHR (11)
objSelection.Hyperlinks.Add objSelection.Range, strWeb «», «», strWeb
objSelection.TypeText CHR (11)
objselection.font.color = RGB (0, 0, 0)
objSelection.TypeText strPostIndex strgorod strstreet

Blokkolja azzal a feltétellel, hogy hívja az aláírást az aláírás ez a kimenet:

Set objSelection = objDoc.Range ()
objSignatureEntries.Add «AD Signature», objSelection
objSignatureObject.NewMessageSignature = «AD Signature»
objSignatureObject.ReplyMessageSignature = «AD Signature»

objDoc.Saved = True
objDoc.Close
objWord.Quit

A forgatókönyv kész, menteni, mint: imya_fayla.VBS. hagyta, hogy azok 5 db. Nevezett eltérően minden változik a logó - a „kép” az irodában.

Következő lépésként hozzon létre egy új csoportházirend minden forgatókönyvet, és tegye a kódot autostart a bejelentkezést. Kapunk 5 csoport politika, mindegyik egy külön iroda, a maga módján, hogy a minta (logó).

Ő teremtett egy script, akkor ellenőrizze a számítógép, kilövése előtt elindítja az Outlook.

Ha elérte a kívánt helyzetbe, a betűtípus és emblémájának tegye csoport politika.

és már a saját csoport politikák irodák, mi határozza meg azt a csoportot.

Csoportok létrehozása attribútumok, van még egy kő. Ha hozunk létre egy csoportot, és ez a mi dinamikus, azaz a munkavállaló átvihetjük egyik irodából a másikba? Csináltam két csoport között. Az egyik csoport OUTL-kontora1 ehhez a csoporthoz kapcsolódik Group Policy.

A második csoport, podpis office-1, azt hozzá felhasználókat attribútum „szoba”, minden reggel, a szokásos referencia. Mit csinálok munkahelyet minden reggel, és miért? Törölheti a korábban létrehozott egy felhasználói csoport: podpiskontora1, podpis kontora2, podpis kontora3, podpis kontora4, podpis kontora5. Hozzon létre egy felhasználói csoport: podpiskontora1, podpis kontora2, podpis kontora3, podpis kontora4, podpis kontora5. Hozzáadása, hogy ezek a csoportok a felhasználók attribútum „szoba”, illetve, ha az attribútum 1, a podpiskontora1 csoport, stb Hozzáadása podpiskontora1 csoport OUTL-kontora1 csoport podpiskontora2 csoport OUTL-kontora2 stb

Mi az eredménye: a csoport nem kell állandóan rendelni csoport politika, a felhasználók folyamatosan frissített csoportokat, amikor öltözők, akkor automatikusan működik.

Létrehozásához Avtopodpis az Outlook a domain felhasználók kell hozzá egy feladat ablakok. Mivel a csapat a munkánk során a kiszolgáló, akkor meg kell menteni doc kódolást.

törölni a feladatot csoportok:

DSRM «cn = podpis kontora1, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -noprompt
DSRM «cn = podpis kontora2, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -noprompt
DSRM «cn = podpis kontora3, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -noprompt
DSRM «cn = podpis kontora4, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi« -noprompt
DSRM »cn = podpis kontora5, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi« -noprompt

létrehozását feladat csoportok:

dsadd csoport «cn = podpis kontora1, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi»
dsadd csoport «cn = podpis kontora2, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi»
dsadd csoport «cn = podpis kontora3, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi»
dsadd csoport «cn = podpis kontora4, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi»
dsadd csoport «cn = podpis kontora5, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi»

felhasználókat adhat a feladat attribútumai „szoba”

dsquery * -filter «(physicalDeliveryOfficeName = 1)» | dsmod csoport «cn = podpis kontora1, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -chmbr
dsquery * -filter «(physicalDeliveryOfficeName = 2)» | dsmod csoport «cn = podpis kontora2, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -addmbr
dsquery * -filter «(physicalDeliveryOfficeName = 3)» | dsmod csoport «cn = podpis kontora3, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -addmbr
dsquery * -filter «(physicalDeliveryOfficeName = 4)» | dsmod csoport «cn = podpis kontora4, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -addmbr
dsquery * -filter «(physicalDeliveryOfficeName = 5)» | dsmod csoport «cn = podpis kontora5, OU = mail podpis, ou = felhasználók, dc = Domen, dc = helyi» -addmbr

Ie. minden domain felhasználó a attribútum „helyiség” 1, bekerül a podpis kontora1 csoportban.

Továbbra is a csoportot, hogy a csoportba.

dsmod csoport «cn = OUTL-kontora1, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi» -addmbr «cn = podpis kontora1, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi "
dsmod csoport «cn = OUTL-kontora2, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi» -addmbr «cn = podpis kontora2, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi "
dsmod csoport «cn = OUTL-kontora4, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi» -addmbr «cn = podpis kontora3, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi "
dsmod csoport «cn = OUTL-kontora5, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi» -addmbr «cn = podpis kontora4, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi "
dsmod csoport «cn = OUTL-kontora6, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi» -addmbr «cn = podpis kontora5, OU = mail podpis, OU = felhasználók, dc = Domen, dc = helyi

Ahhoz, hogy erre a feladatra, hogy adjunk az Outlook Avtopodpis domain felhasználó vett:

„Szoba” attribútummal. kiválasztott alapján a felhasználók a megfelelő csoportok, hogy hozzon létre egy script, hogy adjunk hozzá egy aláírás különböző logók, rendelted csoportba tartozó egyedi politikák csoportirányelveket magukat ahhoz a csoporthoz, és végül holtversenyben csoport csoport politikák és felhasználói csoportok rendezve nekünk.

Made oly módon Outlook Avtopodpis a domain felhasználók jól működik az Outlook valamennyi verzióját.

A szinkronizálás WordPress felhasználóknak c Aktív könyvtár
Fotó hozzáadása Active Directory felhasználói
Remote Assistant Windows tartomány
Kalkulátor jelölések SMD kondenzátorok

előző ◈ a következő