=================================================================================================================
'Terima kasih telah menggunakan program fungsi praktis yang dikembangkan oleh Asp001 Studio
'Http://www.asp001.net
'========================================.
'QQ: 1974229
'E-mail: [email protected]
'Untuk lebih banyak program unduh, silakan kunjungi http://www.asp001.net
'=======================================================================================================
'PENDAHULUAN FUNGSI: Daftar grup pengguna dan pengguna NT
'Fungsi ini menggunakan ADSI dan membutuhkan izin pengguna grup administrator
'Nama Fungsi: ListGroup (komputer)
'Pengembangan Program: Asp001 Studio Chuqi
'Penggunaan: ListGroup (Nama Komputer)
'Contoh: Tampilan 127.0.0.1 Komputer NT Pengguna Grup dan Pengguna
'ListGroup "127.0.0.1"
'=======================================================================================================
FunctionListGroup (komputer)
response.write "<p> <b> Berikut ini adalah komputer" & "Komputer &" Grup Pengguna Sistem dan Daftar Pengguna </b> </p> "
SetComputerobj = getObject ("winnt: //" & komputer)
Computerobj.filter = array ("grup")
Foreachmemberincomputerobj
Response.write "grup pengguna:" & anggota.name & "<br>"
ListUserComputer, anggota.name
Berikutnya
fungsi endfungsi
'Sebutkan pengguna grup pengguna yang ditentukan
FunctionListUser (komputer, grup)
Setuserobj = getObject ("winnt: //" & computer & "/" & group)
Foreachmemberinuserobj.members
Response.write "pengguna grup:" & anggota.name & "<br>"
Berikutnya
Fungsi endfungsi