अनुभवी छोटी चीजें विंडोज व्यवस्थापक

मुझे हमेशा उन पोस्ट की एक श्रृंखला लिखने की इच्छा थी, जहां थोड़ी सी दिलचस्प छोटी चीजें और कार्य जो मुझे सिस्टम प्रशासक की दैनिक दिनचर्या में हल करने थे, उन्हें रेखांकित किया जाएगा।
शायद उपरोक्त में से कुछ अन्य सिस्टम प्रशासकों के लिए उपयोगी होंगे।

मुझे तुरंत एक आरक्षण करना होगा कि मेरे पास स्रोत डेटा के रूप में विंडोज वातावरण और सक्रिय निर्देशिका डोमेन है, और ओएस मुख्य रूप से विंडोजएक्सपी - सर्वर 200 है। अच्छी तरह से सेवा की गई कंपनियां ज्यादातर मध्यम आकार की (30 से 500 उपयोगकर्ताओं से) थीं।

आइए शुरू करें, शायद, यह निर्धारित करने के लिए कि उपयोगकर्ता किस कंप्यूटर पर काम कर रहा है।

इस समस्या को हल करने के लिए, विभिन्न तकनीकों की कोशिश की गई है:

• उपयोगकर्ता नाम से मशीन का नामकरण (थकाऊ। कुछ महीनों के बाद, आप कंप्यूटर का नाम बदलना भूल जाते हैं, और सिस्टम अराजकता में बदल जाता है)
• जहाँ आप एक अलग एक्सेल में कहीं जा सकते हैं और केवल एक विशेष मशीन, आदि के लिए लॉगऑन के अधिकारों को सेट करने के लिए सख्त लेखांकन। (शुद्ध पानी व्यामोह, ग्राहकों में से एक था। बहुत उबाऊ और नीरस)
• SINinternals से bginfo और psloggedon, सभी प्रकार के Hyena और Ideal प्रशासक (उनमें से अधिकांश के पास पैसे खर्च होते हैं, हमेशा सही तरीके से काम नहीं करते हैं, या बहुत खुले हैं, उदाहरण के लिए, डेस्कटॉप पर BgInfo के मामले में, जानकारी है कि मैं नहीं देखना चाहता हूँ कि पूरी तरह से दिखाई देगा)। यह सब, शायद यह व्यामोह है - लेकिन मैं बिक्री विभाग में या रिसेप्शन पर अनजान लोगों की भीड़ को कंप्यूटर, उपयोगकर्ता, आईपी आदि के आंतरिक नाम को पहचानने के लिए स्क्रीन पर देखकर नहीं चाहता।

नतीजतन, हमने " वीबीएस और उपयोगकर्ताओं के साथ हमारे लुनपार्क का निर्माण किया ", और 2 छोटी लॉगऑन-लॉगऑफ स्क्रिप्ट लिखीं, जो कि उपयोगकर्ता द्वारा लॉग आउट करते समय और जब क्रमशः लॉग आउट होते हैं, तो पूरे डोमेन स्तर पर समूह नीति द्वारा चलाए जाते हैं।

लोगोन विकल्प

Dim adsinfo, ThisComp, oUser

'
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)

' AD
' Department ,
Thiscomp.put "Department", "Logged on: " + oUser.cn + " " + CStr(Now)
ThisComp.Setinfo

' Department
oUser.put "Department", "Logged on: " + ThisComp.cn + " " + CStr(Now)
oUser.Setinfo
wscript.quit

लॉग ऑफ-विकल्प

Dim adsinfo, ThisComp, oUser

'
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)

' AD
' Department ,
Thiscomp.put "Department", "Logged off: " + oUser.cn + " " + CStr(Now)
ThisComp.Setinfo

' Department
oUser.put "Department", "Logged off: " + ThisComp.cn + " " + CStr(Now)
oUser.Setinfo
wscript.quit
कोड की व्याख्याओं की शायद जरूरत नहीं है, स्क्रिप्ट प्राथमिक है, मैं आपको केवल स्क्रिप्ट के पेशेवरों के बारे में बताऊंगा, जो कि मेरी स्थिति में मीनूओं को काफी प्रभावित करते हैं (जिस पर मैं भी चर्चा करूंगा)।

आकर्षण आते हैं

• इस तरह की स्क्रिप्ट के साथ, यह एक अतिरिक्त कॉलम (हमारे मामले, विभाग में) को प्रदर्शित करने के लिए AD स्नैप-इन को कॉन्फ़िगर करने के लिए पर्याप्त है और आप स्पष्ट रूप से देख सकते हैं कि कोई व्यक्ति उस समय काम कर रहा है जब वह लॉगिन हो रहा है, या यदि कोई कंप्यूटर पर काम नहीं कर रहा है, तो वह कौन है जो उस पर काम करने के लिए अंतिम था। और जब लॉग आउट किया गया
• कोई तृतीय-पक्ष सॉफ़्टवेयर शामिल नहीं है, सिस्टम पर लोड (उपयोगकर्ता लॉगिन समय) बहुत थोड़ा बढ़ जाता है
• AD में उपयोगकर्ता कंप्यूटर की पुरानी वस्तुओं की उपस्थिति आसानी से और स्पष्ट रूप से निगरानी की जाती है (अंतिम लॉगिन की तारीख तक)
• डेटा को AD में केंद्रीय रूप से संग्रहीत किया जाता है और किसी अतिरिक्त संग्रहण की आवश्यकता नहीं होती है (फ़ाइल, फ़ोल्डर, डेटाबेस, आदि)। डेटा को उपयोगकर्ता और कंप्यूटर ऑब्जेक्ट्स में डुप्लिकेट किया गया है, अर्थात। आप स्थिति को "अलग-अलग कंप्यूटरों पर एक ही लॉग इन के तहत दो बार" ट्रैक कर सकते हैं।
• कम से कम उपयोग किया जाता है (हमारे लिए और उन सभी संगठनों के लिए जिनके साथ मैंने काम किया) उपयोगकर्ता और कंप्यूटर ऑब्जेक्ट के लिए AD फ़ील्ड सामान्य हैं। यह एक प्लस है, क्योंकि यदि फ़ील्ड अलग थे, तो आपको एडी स्नैप-इन में अतिरिक्त कॉलम का प्रदर्शन जोड़ना होगा
• अपनी इच्छानुसार स्क्रिप्ट को समायोजित करना आसान है (डेटा के भंडारण के लिए अन्य क्षेत्रों का चयन करें, पाठ फ़ाइल में अतिरिक्त रूप से लिखें, व्यक्तिगत उपयोगकर्ताओं या कंप्यूटर को प्रसंस्करण से बाहर करें (उदाहरण के लिए, टर्मिनल सर्वर), आदि)

विपक्ष

• प्रविष्टियों का इतिहास, अर्थात्। केवल वर्तमान स्थिति दर्ज की गई है। यदि आपको प्रविष्टियों के इतिहास की आवश्यकता है, तो अस्थायी रूप से आप नेटवर्क फ़ाइल में भी जानकारी लिखने के लिए कोड की कई पंक्तियों को जोड़ सकते हैं, और यदि आपको लगातार इसकी आवश्यकता है, तो किसी अन्य लेखांकन विधि के बारे में सोचना बेहतर है।
• सभी डोमेन उपयोगकर्ताओं के लिए AD ऑब्जेक्ट्स में कंप्यूटर और उपयोगकर्ता के विभाग फ़ील्ड में अतिरिक्त Write \ संशोधित अनुमति जारी करना आवश्यक है। मेरी स्थिति में माइनस संदिग्ध है, लेकिन मैं इसे अस्वीकार नहीं करूंगा - यह है।

जारी रखा जाए।

पी एस मैं जोड़ना भूल गया। ऑपरेटिंग मोड में, सिस्टम कुछ इस तरह दिखता है: