Delphi Active Directory Benutzer anlegen

Thema durchsuchen

Ansicht

Themen-Optionen

Active Directory Benutzer anlegen

Offene Frage von "Sasuke"

Ein Thema von Sasuke · begonnen am 20. Mär 2008 · letzter Beitrag vom 8. Apr 2008

Vorheriger Beitrag

Nächster Beitrag

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge

#10

Re: Active Directory Benutzer anlegen

31. Mär 2008, 10:40

Hi,

versuche es mal so:

zusammenfalten · markieren

Delphi-Quellcode:

			function DomainToDN(const s: string): string;

var

  i: Integer;

begin

  with TStringList.Create do

  try

    Delimiter := '.';

    DelimitedText := s;

    for i := 0 to Pred(Count) do

      Strings[i] := 'dc=' + Strings[i];

    Delimiter := ',';

    Result := DelimitedText;

  finally

    Free;

  end;

end;