Freigeben über


Erste Schritte mit ASP für ADSI

ADSI kann verwendet werden, um über eine ASP-Seite auf Verzeichnisdaten zuzugreifen. Dies kann eine bequeme Möglichkeit sein, Verwaltungsaufgaben und Abfragen von einer Webseite aus auszuführen oder Mitarbeitern In einem Intranet Informationen bereitzustellen.

Ein Vorteil der Verwendung von ADSI mit ASP besteht darin, dass Sie eine umfassendere Benutzeroberfläche erstellen können, da Sie Visual Basic verwenden können, um eine ADSI-Anwendung zu erstellen und sie einem Benutzer über eine Standardwebseite anbieten zu können. Sie können beispielsweise eine Webseite erstellen, die es Mitarbeitern ermöglicht, den Nachnamen eines Mitarbeiters einzugeben und eine Telefonnummer für diesen Mitarbeiter zurückzugeben, oder ein Formular erstellen, mit dem Mitarbeiter personenbezogene Informationen in einer Unternehmens-Personaldatenbank aktualisieren können.

ASP-Code beginnt mit "<%" und endet mit "%>". Sie können ADSI-Code als VBScript oder Visual Basic hinzufügen.

Um eine ASP-Seite zu erstellen, können Sie einen Webseiten-Editor, Editor oder einen anderen Text-Editor oder das Microsoft Visual Studio .NET-Entwicklungssystem verwenden.

Bevor Sie Ihre ASP-Seite ausführen, richten Sie Ihre Anwendung oder den IIS-Server gemäß den Anweisungen unter Authentifizierungsprobleme für ADSI mit ASP ein.

Ein einfaches ASP-Beispiel: Auflisten von Objekten in einem Container

Erstellen Sie mit einem Webseiten-Editor eine neue HTML-Seite, die den distinguished Name eines Containerobjekts akzeptiert. Geben Sie das folgende Codebeispiel ein.

<html>
<body>

<form method="POST" action="https://localhost/Enum.asp" ID="Form1">
<p>Distinguished name of container:<input type="text" name="inpContainer" size="100" ID="Text2"></p>
<p><input type="SUBMIT" value="GO" ID="Submit1" NAME="Submit1"></p>
</form>

</body>
</html>

Diese Seite kann nun einen Containernamen akzeptieren, der an sie übergeben wird, und ADSI verwenden, um Objekte im Container aufzulisten.

Erstellen Sie eine neue ASP-Seite namens Enum.asp, und geben Sie das folgende Codebeispiel ein. Speichern Sie diese Seite im Stammverzeichnis des lokalen Webservers.

<%@ Language=VBScript %>
<%
' Get the inputs.
containerName = Request.Form("inpContainer")
' Validate compName before using.

If Not ("" = containerName) Then
  ' Bind to the object.
  adsPath = "LDAP://" & containerName
  Set comp = GetObject(adsPath)

  ' Write the ADsPath of each of the child objects.
  Response.Write("<p>Enumeration:</p>")
  For Each obj in comp
    Response.Write(obj.ADsPath + "<BR>")
  Next
End If
%>