تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معرفة اسم الجهاز باستخدام Active Directory ومعلومات أخرى مفيدة
#1
كاتب الموضوع : AhmedEssawy

كل ما عليك هو استخدام الأوبجكت ActiveDs.WinNTSystemInfo وقراءة المعلومات المطلوبة من ضمن المعلومات الكثيرة المتاحة ضمن هذا الكائن :


كود :
On Error Resume Next
Dim oSysInfo As New ActiveDs.WinNTSystemInfo
ComputerName = oSysInfo.ComputerName
Set oSysInfo = Nothing
ولمعرفة الدومين مثلاً :


كود :
DomainName = oSysInfo.DomainName
واسم المستخدم :


كود :
UserName = oSysInfo.UserName
}}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم