सक्रिय निर्देशिका में 100500 नए उपयोगकर्ताओं (MS Windows Server 2003 पर उठाए गए) या सक्रिय निर्देशिका में उपयोगकर्ता खातों को जोड़ने के लिए स्क्रिप्ट को जल्दी से "त्याग" कैसे करें

यह सिर्फ इतना हुआ कि मैंने सिस्टम प्रशासक का पेशा चुना। और मैं अब लगभग 6 वर्षों से कभी-कभी कृतघ्न संबंध बना रहा हूं।
एक बार, कुछ साल पहले, मेरा एक सवाल था कि बाद में एक कार्य में बदल गया, जो एमएस विंडोज सर्वर 2003 के तहत एडी में नए उपयोगकर्ता खातों को अपेक्षाकृत जल्दी कैसे बनाया जाए?

मुझे लगता है कि हर कोई किसी उपयोगकर्ता को डोमेन में जोड़ने का तरीका जानता है, इसलिए "पेन" के साथ बोलना है। अर्थात्, नए AD उपयोगकर्ता खातों को जोड़ने के लिए, आपको निम्नलिखित कुछ करना होगा: उपर्युक्त OS के उपयोगकर्ता और कंप्यूटर स्नैप-इन खोलें, संबंधित OU (संगठन को एकजुट करें) खोलें, किसी भी ज्ञात विधि का उपयोग करके उपयोगकर्ता निर्माण आरंभ करें, और फिर एक के उपयोगकर्ता एक के बाद एक। सहमत, यह काफी लंबा और नीरस है, खासकर यदि आवश्यक उपयोगकर्ता खाते 10 नहीं हैं, लेकिन 300, 500 और अधिक कहते हैं। विशेष रूप से यह तब एक विघ्न बन जाएगा जब आपको न केवल "लॉगिन" और "पासवर्ड" फ़ील्ड भरने की आवश्यकता होती है, बल्कि सभी प्रकार के टैब में स्थित "अंतिम नाम", "प्रथम नाम, मध्य नाम", "स्थिति", "विभाग", "संगठन" फ़ील्ड "आदि बेशक, आप कहेंगे कि किसी ने अभी तक "कॉपी-पेस्ट" और "ब्लाइंड टाइपिंग" के तरीकों को रद्द नहीं किया है, लेकिन आप कोशिश करते हैं और महसूस करते हैं कि उपयोगकर्ता किस खाते से थक गया है, और यदि आप थक नहीं रहे हैं, तो डेटा द्वारा भरा जाने पर हुई त्रुटियों की संख्या की गणना करें।
सामान्य तौर पर, यह महसूस करते हुए कि मुझे इसके साथ कुछ करने की आवश्यकता है और चूंकि मेरे पास सीमित समय था, मैंने एक स्क्रिप्ट को खोजने के लिए इंटरनेट संसाधनों की ओर रुख किया जो मौजूद होना चाहिए और इस समस्या को हल करना चाहिए, जैसा कि मेरी वृत्ति ने सुझाव दिया था। काश, मैंने जो देखा उसमें मैं व्यावहारिक रूप से निराश था। AD वातावरण में विभिन्न कार्यों को स्वचालित करने के लिए इंटरनेट सभी प्रकार की लिपियों से भरा था, लेकिन मुझे जो चाहिए वह पूरी तरह से अनुपस्थित था। मुझे अंग्रेजी-भाषा के संसाधनों की ओर मुड़ना पड़ा, जिनमें से एक पर (अफसोस की बात है, मैं पहले ही साइट लिंक को लिखने के समय खो चुका था। ऐसे विचार थे कि कहां देखना है, और अगर मुझे यह मिल जाए, तो मैं इसे प्रकाशित कर दूंगा) वीबीएस में एक बहुत ही "मछली" लिपि थी "बहुत" जब मैं परीक्षण प्रणाली पर इसका उपयोग करने की कोशिश करता था, तो यह कुछ भी नहीं हुआ था - यह बस, एक प्राथमिकता, काम नहीं किया, क्योंकि इसमें कई खामियों और प्रतिबंध संबंधी त्रुटियों की उपस्थिति थी, जैसा कि मुझे बाद में पता चला। मुझे ठीक करना था, कोड जोड़ना और सब कुछ के अलावा, थोड़ा VBS प्रोग्रामर बन गया :)
इसके लिए, मैं आदरणीय जनता के दरबार से परिचय कराऊं कि पहले से निर्मित OUs (स्तर 1) में AD में उपयोगकर्ता खाते जोड़ने के लिए एक स्क्रिप्ट। यदि यह सवाल उठता है कि OUs स्वचालित रूप से क्यों नहीं बनाए गए हैं, तो मैं पहले से ही जवाब देता हूं कि मुझे ऐसा करने का तरीका नहीं मिला है, और AD में किए जा रहे बदलावों पर नियंत्रण इतना कठिन है - आपको अभी भी सैंडबॉक्स में खेलना है, लेकिन एक शक्तिशाली और कामकाज में वास्तविक परिवर्तन करें समय प्रणाली, तथाकथित "सक्रिय निर्देशिका"।

महत्वपूर्ण सूचना!
अग्रिम में, आपको विभाजक युक्त फ़ाइल बनाने की आवश्यकता है ";" आवश्यक पैरामीटर:
लॉग इन; पासवर्ड; पहला नाम; उपनाम; कार्यालय; डिवीजन; संगठन;
एक अनुगामी परिसीमन होना चाहिए ";" प्रत्येक पंक्ति में, उदाहरण के लिए:
sirin-bird1; password1; पहला नाम 1; Familiya1; Position1; Otdel1; Organization1;
sirin-bird2; parol2; नाम Patronymic2; Familiya2; स्थिति 2; Otdel2; Organizatsiya2;
sirin-bird4; parol3; Name2 Patronymic3; Familiya3; Dolzhnost3; Otdel3; Organizatsiya3;
sirin-bird3; parol4; नाम पेट्रोनामिक 4; Familiya4; स्थिति 4; Otdel4; Organizatsiya4;
sirin-bird5; parol5; Name2 Patronymic5; Familiya5; Dolzhnost5; Otdel5; Organizatsiya5;
... ... ... ... ... ... ...
ऐसी फाइल का निर्माण अकुशल कर्मियों को सौंपा जा सकता है जो प्राथमिक पाठ संपादक को संभाल सकते हैं। और फिर सिर्फ सही टाइपिंग और विभाजकों की नियुक्ति की जांच करें, जैसा कि आपके विनम्र नौकर ने किया था।

एक और महत्वपूर्ण बिंदु!
"संगठन" पैरामीटर संबंधित उपयोगकर्ता के लिए OU है और इस स्क्रिप्ट द्वारा नहीं बनाया गया है, इसलिए इसे काम करने के लिए, पहले डोमेन की जड़ में (OU फ़ोल्डर "उपयोगकर्ता" के पास) संबंधित OU बनाएं। यह इस तथ्य के कारण है कि मेरे डोमेन में अपने स्वयं के उपयोगकर्ता उपयोगकर्ताओं के साथ कई ग्राहक संगठन थे, इसलिए यह अलगाव है।

तो स्क्रिप्ट ही:
ObjArgs = WScript.Arguments सेट करें
if objArgs.Count = 0 तो
WScript.Echo "उपयोगकर्ताओं को डोमेन में जोड़ता है।"
WScript.Echo "add_to_ad.vbs [फ़ाइल नाम]"
WScript.Echo "[फ़ाइल नाम] - उपयोगकर्ताओं की सूची के साथ फ़ाइल"
WScript.Echo "फ़ाइल प्रारूप: लॉगिन; पासवर्ड; पहला नाम; अंतिम नाम; स्थिति; विभाग; संगठन;"
WScript.Quit
अगर अंत
पथ = objArgs (0)

Fso सेट करें = CreateObject ("Scripting.FileSystemObject")
ObjFile = fso.OpenTextFile (पथ, 1) सेट करें
जब तक objFile.AtEndOfStream करें
str = objFile.ReadLine
i = 1 से लेन (str) चरण 1 के लिए
strCh = Mid (str, i, 1)
अगर strCh = ";" तो
मामले का चयन करें Z
मामला 0
UserName = strRez '*** लॉगिन
मामला 1
UserPassword = strRez '*** पासवर्ड
मामला 2
FirstName = strRez '*** पहला नाम
मामला 3
अंतिम नाम = strRez '*** अंतिम नाम
मामला 4
शीर्षक = strRez '*** स्थिति
मामला 5
विभाग = strRez '*** विभाग
मामला 6
कंपनी = strRez '*** संगठन
'केस 7
'प्रबंधक = strRez' *** प्रबंधक
'केस 8
'OfficeRoom = strRez' *** कमरा
अंत का चयन करें
strRez = ""
strCh = ""
जेड = जेड + १
अन्यथा
strRez = strRez + strCh
अगर अंत
अगला
strRez = ""
strCh = ""
जेड = 0

सेट करें objRoot = GetObject ("LDAP: // RootDSE")
ObjADSystemInfo = CreateObject ("ADSystemInfo") सेट करें
DomainDNSName = objADSystemInfo.DomainDNSName
DomainDN = objRoot.Get ("DefaultNamingContext")
कंटेनर = "ou =" और कंपनी और "," और डोमेनडीएन

pName = उपयोगकर्ता नाम और "@" और DomainDNSName '"@ snb.local"

'!!! महत्वपूर्ण !!! *** हम उन्नत किए गए OU को इंगित करते हैं जिसमें नए उपयोगकर्ता ******* भागते हैं

ObjOU सेट करें = GetObject ("LDAP: //" और कंटेनर)

'******************************************* *****
सेट करें objUser = objOU.Create ("उपयोगकर्ता", "cn =" + UserName)
'**** लॉगिन *****
objUser.Put "sAMAccountName", उपयोगकर्ता नाम
objUser.SetInfo

'****** पासवर्ड *******
सेट करें objUser = GetObject ("LDAP: // cn =" + उपयोगकर्ता नाम + "," + उपयोगकर्ता नाम)
objUser.SetPassword UserPassword

'******* UPN **********
objUser.Put "userPrincipalName", pName

'****** खाता बंद करना *******
objUser.AccountDisabled = TRUE

'******** नाम *********
objUser.Put "दिया नाम", फर्स्टनाम

'***** अंतिम नाम *********
objUser.Put "एसएन", लास्टनेम

'***** प्रदर्शन का नाम ******
objUser.Put "displayName", LastName & "" & FirstName

'प्रथमाक्षर
objUser.Put "इनिशियल", लेफ्ट (फर्स्टनाम, 1) और "।" 'और बाएं (अंतिम नाम, 1)

'***** स्थिति ******
objUser.Put "शीर्षक", शीर्षक

'***** मंडल ******
objUser.Put "विभाग", विभाग

'संगठन
objUser.Put "कंपनी", कंपनी

'हेड
'objUser.Put "प्रबंधक", प्रबंधक

'कमरे
'objUser.Put "PhysicalDeliveryOfficeName", OfficeRoom

'***** सेट। अगले लॉगिन पर पासवर्ड बदलने की आवश्यकता है ***
objUser.Put "pwdLastSet", CLng (0)

objUser.SetInfo

'WScript.Echo "उपयोगकर्ता -" + उपयोगकर्ता नाम + "विज्ञापन में जोड़ा गया"

लूप
WScript.Echo "उपयोगकर्ता AD में जोड़े गए"
objFile.Close

अतिरिक्त कोड को स्क्रिप्ट में डाला जाना चाहिए:

'' होम डायरेक्टरी
'objUser.Put "HomeDirectory", strHomeDirPath

'मेलबॉक्स
'objUser.Put "mailNickname", strName

'वेबसाइट
'objUser.Put "wWWHomePage", "www.test.com"

'कुछ और उदाहरण:
"ObjUser.Put" विवरण "," वर्ष 2 "
'objUser.Put "physicalDeliveryOfficeName", sOfficeName
'objUser.Put "ProfilePath", sScPath
sHDrive objUser.Put "होमड्राइव", "Z"
'objUser.Put "TerminalServicesProfilePath", sTermProf
'objUser.Put "TerminalServicesHomeDirectory", sTermHDir

टेक्स्ट एडिटर के कोड को एक्सटेंशन .vbs के साथ सेव करना होगा
किसी फ़ाइल से पैरामीटर पास करके स्क्रिप्ट लॉन्च की जाती है।
उदाहरण के लिए: script.vbs users.txt
जहाँ
script.vbs - स्क्रिप्ट ही
users.txt - इनपुट डेटा के साथ फ़ाइल।

स्क्रिप्ट निष्पादन त्वरित आउटपुट के साथ सेकंड लेता है।
जैसा कि आप कोड से देख सकते हैं, यदि आप कुछ पंक्तियों को अनसुना करते हैं और इनपुट मापदंडों के साथ फ़ाइल में परिवर्धन करते हैं, तो आप "स्वचालित रूप से" प्रबंधक और कक्ष संख्या भी बना सकते हैं। स्क्रिप्ट को अनिश्चित काल तक विकसित किया जा सकता है। उदाहरण के लिए, "फ़ोन" जैसे फ़ील्ड में उसी तरह से प्रवेश करने की क्षमता जोड़ें।
विंडोज के लिए एक टेक्स्ट एडिटर के रूप में, मैं फ्री-टू-यूज़ और अत्यधिक कार्यात्मक नोटपैड ++ की सलाह दे सकता हूं।
उपयोगी लिंक में से एक जहां वीबीएस पर स्क्रिप्ट हैं: forum.sysadmins.su
मुझे आशा है कि प्रदान की गई जानकारी किसी के लिए बहुत उपयोगी और आवश्यक होगी।