Thaiadmin

script ดึง user ที่อยู่ในเครื่องแบ่งตาม group

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

A

เอามาจากในกระทู้ที่เคยตอบ

listUserGroup.vbs
โค๊ด: [Select]
strComputerName = "COMPUTER_NAME"

winmgmt1 = "winmgmts:{impersonationLevel=impersonate}!//"& strComputerName &""
Set GroupSet = GetObject(winmgmt1).InstancesOf ("Win32_Group")

For Each Group in GroupSet
sMembers = ""
Set oGroup = GetObject("WinNT://" & strComputerName & "/" & Group.Name & ",group")
For Each oMember In oGroup.Members
sMembers = sMembers & oMember.Name & ","
Next
If Len(sMembers) > 0 Then
sMembers = Left(sMembers, Len(sMembers) - 1)
End If
WScript.Echo Group.Name & ";" & sMembers
Next

computer name ใช้ IP ได้แต่ห้ามเป็น localhost หรือ 127.0.0.1
และก็ตัวนี้ควร run ด้วย cscript แล้ว redirect output ลงไฟล์เอาเอง

ออฟไลน์ M.a.k.u.b.e.x

  • Global Project Leader
  • *****
  • 3,790
  • 88
  • เพศ: ชาย
  • Are you alone in the Dark?
    • IT Solutions Consultant and Services Co., Ltd.
Re: script ดึง user ที่อยู่ในเครื่องแบ่งตาม group
« ตอบกลับ #1 เมื่อ: 19 ธันวาคม 2014, 11:12:19 »
ขุดให้ได้อ่านกัน