90 lines
2.8 KiB
Plaintext
90 lines
2.8 KiB
Plaintext
//+-------------------------------------------------------------------------
|
|
//
|
|
// THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF
|
|
// ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO
|
|
// THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
|
|
// PARTICULAR PURPOSE.
|
|
//
|
|
// Copyright (c) Microsoft Corporation. All rights reserved.
|
|
//
|
|
// First ASP Sample: Enumerating a Computer Object using ADSI and ASP
|
|
//
|
|
//--------------------------------------------------------------------------
|
|
|
|
Description
|
|
===========
|
|
The First sample shows how to use ADSI in an Active Server Page (ASP) to bind
|
|
to a specified computer and enumerate information about the computer.
|
|
|
|
This sample uses the WinNT: provider and is suitable for Windows NT(R) 4.0
|
|
networks as well as Windows 2000 and later networks running Active Directory.
|
|
|
|
Sample Files
|
|
============
|
|
* Default.Htm
|
|
* Enum.Asp
|
|
|
|
Running the Sample
|
|
==================
|
|
This sample requires that you install Microsoft Internet Information Services
|
|
on a Web server in the domain. For example, the location of the Web server
|
|
might be www.fabrikam.com.
|
|
|
|
To run this sample
|
|
1. Copy the two sample files to the wwwroot folder of the Web server.
|
|
2. In Microsoft Internet Explorer, enter "http://www.fabrikam.com"
|
|
in the Address field and select Go.
|
|
3. In the resulting "ADSI ASP Sample: Enumerating a computer object" page,
|
|
enter a computer name to enumerate and a user name and password to use
|
|
for credentials.
|
|
|
|
Example Output
|
|
==============
|
|
The sample produces HTML output similar to the following, which is for the
|
|
computer FABRIKAMDC. Most of the output is deleted to save space.
|
|
|
|
Computer Name: fabrikamdc
|
|
|
|
Contains the following objects:
|
|
|
|
Administrator User
|
|
ASPNET User
|
|
Guest User
|
|
...
|
|
Administrators Group
|
|
Users Group
|
|
Guests Group
|
|
Print Operators Group
|
|
Backup Operators Group
|
|
...
|
|
Alerter Service
|
|
ALG Service
|
|
AppMgmt Service
|
|
appmgr Service
|
|
aspnet_state Service
|
|
AudioSrv Service
|
|
BITS Service
|
|
Browser Service
|
|
...
|
|
|
|
How the Sample Works
|
|
====================
|
|
The Default.Htm file accepts the computer name, user name and password and
|
|
posts them to the Enum.Asp file.
|
|
|
|
The Enum.Asp file contains the script statements
|
|
|
|
compName = Request.Form("computer")
|
|
usrName = Request.Form("userName")
|
|
password = Request.Form("password")
|
|
|
|
adsPath = "WinNT://" & compName & ",computer"
|
|
Set dso = GetObject("WinNT:")
|
|
Set comp = dso.OpenDSObject(adsPath, userName, password, 1)
|
|
|
|
which specify the computer object for the query. The ASP file then
|
|
enumerates the objects in the specified computer object and outputs the
|
|
Name and Class of each enumerated object.
|
|
|
|
|