الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف يمكن تنفيذ VB Script باسم مستخدم مختلف

مغلق
بدأه samra في 26 يونيو 2006 · 3 رد · 1,181 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الإخوة المبرمجين الكرام , السلام عليكم ورحمة الله وبركاته :

لدي شبكة مكونة من Server عليه Windows Server وأجهزة Clients ضمن Domain واحد .

وأرغب بعمل Script مكتوب بلغة VB Script أضعه على السيرفر ليقوم بتنفيذ أمر معين على كل حاسب في الشبكة .

مثلاً أرغب بتغيير كلمة سر حساب الــ Administrator المحلي (Locally) لكل جهاز على الشبكة .

وطبعاً المستخدمين الموجودين على الشبكة جميعهم ينتمون للمجموعة Domain User , وهذه المجموعة لاتعطي المستخدم صلاحية تعديل كلمة السر للحساب

المذكور , وهذه الصلاحية فقط للمستخدمين اللذين يملكون صلاحية المدير , لذلك كان سؤالي هو التالي :

هل يمكن أن أقوم بتشغيل هذا الــ Script على الجهاز المحلي (Locally) باسم مستخدم وكلمة مرور له صلاحية المدير (Administrator) , وذلك ضمن Code أكتبه بنفس الــ Script

الذي أريد تشغيله , بحيث أضع اسم مستخدم وكلمة مروره ويكون له صلاحية المدير إما على الشبكة أو على الجهاز المحلي , وبذلك يتم تنفيذ السكريبت مع كامل الصلاحيات.

بشكل أوضح أريد Code يشبه تماماً في عمله الأمر (Runas) الموجود في الويندوز .

لقد قمت بالبحث في مواقع عديدة وعثرت على الكود التالي :

strComputer = "YouComputer"

strUserName = "Administrator"  

strPassword = "Pass"

Set objLocator = CreateObject("WbemScripting.SWbemLocator")  

Set oReg = objLocator.ConnectServer(strComputer, strUserName, strPassword ,"root\cimv2")

ولكن بعد التنفيذ تظهر لي هذه الرسالة , ويبدو أنه ليس لتنفيذ Script على جهاز محلي .

18839.gif

لذلك أرجو ممن يعرف كود خاص بــ Visual Basic Script يقوم بتنفيذ Script على الجهاز المحلي باسم مستخدم مختلف أن يفيدني فيه للحاجة الماسة لذلك , جزاكم الله خيراً وشكراً لكم مسبقاً .

تحياتي للجميع .

#2

للرفع يامبدعين ...

#3

UP....

#4

للمرة الأخيرة ..

للرفع ...

هذا الموضوع مغلق.

مواضيع مشابهة