Ambiente Dos

[guilhermeacl]

Pessoal;

Estou tentando executar um certo comando utilizando tanto o WinExec como o CreateProcess, mas preciso resgatar as variáveis que foram executadas no ambiente DOS.

alguém já se deparou com este problema?

[Micheus]

procedure TForm1.Button1Click(Sender: TObject);
var
  buffer :array[0..255] of char;
begin
  if GetEnvironmentVariable('TEMP', buffer, SizeOf(buffer)) > 0 then
    Label1.Caption := StrPas(buffer);
end;

[]s

[Churc]

hum,

mas Micheus acho que não é isso que ele quer não...

isso ai pega variáveis de ambiente do Windows, o que ele

quer é algo de pegar o que foi passado por determinado programa ou comando executado no DOS...

se possível guilhermeacl explica melhor...

[guilhermeacl]

Bom, vamos lá.

Estou passando via linha de comando pelo WinExec ou CreateProcess algo do tipo ('cmd /c dsquery user -name fulano', sw_hide ou sw_normal), esta linha me retorna onde o fulano esta na minha árvore do AD, porém estou fazendo as cegas, quando não encontro o fulano a pesquisa dá erro, e não consigo vizualizar este erro. Sei que poderia realizar uma pesquisa deste tipo direto no meu AD, mas não serei eu que ira dar uma manutenção nos usuários do AD, e não gostaria de abrir um terminal para alguém que não fosse da administração de redes. Por isso o motivo de estar desenvolvendo uma aplicação para pesquisa e alteração de senhas dos usuários.

...

[siam]

Você pode direcionar a saída de cmd para um arquivo e depois ler este arquivo.

[Thales Pontes Martins]

porque que você não tenta 'cmd /c dsquery user -name fulano > NomeDoArquivo.txt'.