Hallo,
vor mir steht die Aufgabe, aus den Infos des ADS eine Telefonbuch zu stricken. Möglichst auch noch so, dass man Änderungen darin vornehmen kann, die dann ins ADS zurückgeschrieben werden.
Irgendwann habe ich es dann auch hinbekommen, die ADS-Benutzerinfos nach XL auszugeben. Nun aber die Hürde via Frontpage. Ich hatte dann im Internet einen Quellcode von Ihnen gefunden, der mir aber nicht weitergeholfen hat:
<%@ Language=VBScript %>
<html>
<head>
<meta name="GENERATOR" content="Microsoft Visual Studio 6.0">
Test
</head>
<body>
<%
' http://www.devtrain.de/news.aspx?artnr=360
' LDAP://dc=se-dresden,dc=de' " & "where objectCategory='Person' and objectClass='user' or objectClass='contact' ", conAD
Dim oContainer
Dim ExServ
Dim oCont
Dim uUser
ExServ = "server-exchange"
o = "ppedv"
ou = "se-dresden"
strUser = "UserName"
' On Error Resume Next
' Set oCont = GetObject("LDAP://" & ExServ & "/o=" & o & "/ou=" & ou & "/cn=Recipients/cn=" & strUser)
Set oCont = GetObject("LDAP://dc=se-dresden,dc=de,cn=JSchroepfer")
response.write "test"
Response.Write strUser & "<br>"
Response.Write "<b>1.FirstName:</b> " & oCont.FirstName & "<br>"
Response.Write "<b>2.LastName:</b> " & oCont.LastName & "<br>"
Response.Write "<b>3.EMail:</b> " & oCont.Mail & "<br>"
Response.Write "<b>4.Department:</b> " & oCont.Department & "<br>"
Response.Write "<b>5.Telephone Number:</b> " & oCont.TelephoneNumber & "<br>"
Response.Write "<b>6.Postal Address:</b> " & oCont.PostalAddress & "<br>"
Response.Write "<b>7.See Also:</b> " & oCont.SeeAlso & "<br>"
Response.Write "<b>8.BusinessCategory:</b> " & oCont.BusinessCategory & "<br>"
Response.Write "<b>9.Description:</b> " & oCont.Description & "<br>"
Response.Write "<b>10.Title:</b> " & oCont.Title & "<br>"
Response.Write "<b>11.Manager:</b> " & oCont.Manager & "<br>"
Response.Write "<b>12.TelephoneHome:</b> " & oCont.TelephoneHome & "<br>"
Response.Write "<b>13.TelephoneMobile:</b> " & oCont.TelephoneMobile & "<br>"
Response.Write "<b>14.OfficeLocations:</b> " & oCont.OfficeLocations & "<br>"
Response.Write "<b>15.PostalCodes:</b> " & oCont.PostalCodes & "<br>"
Response.Write "<b>16.EMailAddress:</b> " & oCont.EMailAddress & "<br>"
%>
</body>
</html>
Betreff |
Von |
Datum |
|
|
Re: Hilfe bei XML
Worin liegt das Problem genau?<br>1. Die Daten werden nicht mehr in die XML-Datei gerieben?<br>2. Die Daten werden nicht mehr ins ADS zurückgerieben?<br>3. Die Daten sollen im XML-Format im Browser... |
|
|
|
|
|
Christian
Drache
|
15.06.2005 13:45 |
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!