Domänen Computer deaktivieren ???

[Piro]

So ich kann den betreffenden PC auslesen.

Delphi-Quellcode:

procedure DisableComputerAccount(computer : String);
var rs,conn, com : Variant;
    strBase, strFilter, strAttributes, strADS, strName, strPager : string;
begin
  conn := CreateOleObject('ADODB.Connection');
  com := CreateOleObject('ADODB.Command');
  try
    conn.Provider := 'ADsDSOObject';
    conn.open;
    com.ActiveConnection := conn;
    strBase := '<LDAP://[Domäne]/OU=...,DC=...>';
    strFilter := '(&(Objectclass=computer)(Name='+ computer + '))';
    strAttributes := 'Name, Location';
    strADS := strBase + ';' + strFilter + ';' + strAttributes + ';subtree';
    Com.CommandText := strADS;
    Com.Properties['Page Size'] := 100000;
    Com.Properties['Searchscope'] := 2;
    Com.Properties['Cache Results'] := False;
    rs := Com.Execute;

    While Not rs.EOF do
    begin
      ShowMessage('Computer: ' +rs.Fields['Name'].Value);
      rs.MoveNext;
    end;

  finally
    com := NULL;
    conn.Close;
    conn := NULL;
  end;
end;

Aber wie kann ich jetzt den Computer deaktivieren? Mir fehlen die Eigenschaften und weiß nicht wie man das macht.