-
'ขอบคุณสำหรับการใช้โปรแกรมฟังก์ชั่นการปฏิบัติที่พัฒนาโดย ASP001 Studio
'http://www.asp001.net
'==============================================================================' ASP001 Studio ให้บริการโปรแกรมที่กำหนดเอง
'qq: 1974229
'อีเมล: [email protected]
'สำหรับโปรแกรมเพิ่มเติมดาวน์โหลดโปรดไปที่ http://www.asp001.net
-
'ฟังก์ชั่นบทนำ: รายการกลุ่มผู้ใช้และผู้ใช้ NT NT
'ฟังก์ชั่นนี้ใช้ ADSI และต้องการการอนุญาตผู้ใช้กลุ่มผู้ดูแลระบบ
'ชื่อฟังก์ชั่น: ListGroup (คอมพิวเตอร์)
'การพัฒนาโปรแกรม: ASP001 Studio Chuqi
'การใช้งาน: ListGroup (ชื่อคอมพิวเตอร์)
'ตัวอย่าง: แสดง 127.0.0.1 คอมพิวเตอร์กลุ่มผู้ใช้ NT และผู้ใช้
'ListGroup "127.0.0.1"
-
FunctionListGroup (คอมพิวเตอร์)
Response.write "<p> <b> ต่อไปนี้เป็นคอมพิวเตอร์" & คอมพิวเตอร์ & "กลุ่มผู้ใช้ระบบและรายชื่อผู้ใช้ </b> </p>"
setComputerobj = getObject ("winnt: //" & คอมพิวเตอร์)
Computerobj.filter = array ("กลุ่ม")
foreachmemberincomputerobj
Response.write "กลุ่มผู้ใช้:" & member.name & "<br>"
ListUserComputer, member.name
ต่อไป
endfunction
'แสดงรายการผู้ใช้กลุ่มผู้ใช้ที่ระบุ
functionListuser (คอมพิวเตอร์, กลุ่ม)
setUserObj = getObject ("winnt: //" & คอมพิวเตอร์ & "/" & กลุ่ม)
foreachmemberinuserobj.Members
Response.write "กลุ่มผู้ใช้:" & member.name & "<br>"
ต่อไป
endfunction