Consumir um WebService ASPX com Autenticação SOAP via Delphi

Delphi

08/11/2013

Pessoal, alguém sabe como configurar um acesso via Delphi para consumir um WebService ASPX com Autenticação SOAP? Não consigo enviar as informações de Usuário e Senha para o WebService, abaixo segue o código:

procedure TfrmPrincipal.btnTabelaRXClick(Sender: TObject);
var
autenticacao: AuthHeader;
vServidor: WebService01;
resultado: String;
begin
autenticacao := AuthHeader.Create;
autenticacao.Username := edtUsuario.Text;
autenticacao.Password := edtSenha.Text;
try
vServidor.TabelaRX(edtUsuario.Text);
except
on E: Exception do
ShowMessage(E.Message);
end;
end;
Wolfwave76

Wolfwave76

Curtidas 0

Respostas

Wolfwave76

Wolfwave76

08/11/2013

Consegui autenticar o problema agora é que o WebService retorna um TRemotable e não estou conseguindo importar para um DBGrid, alguém pode dar um HELP?
GOSTEI 0
Leonardo Centenaro

Leonardo Centenaro

08/11/2013

Opa,

Cara, como você resolveu o problema de autenticação? Acredito que estou utilizando o mesmo Webservice que você, também tem a função TabelaRX e o AuthHeader.

Sobre o segundo problema acredito que tenha conseguido resolver pela data do seu post rsrs. Mas caso nao tenha conseguido, detalha ele um pouco mais que posso tentar ajudar?
GOSTEI 0
Leonardo Centenaro

Leonardo Centenaro

08/11/2013

Consegui realizar a autenticação no cabeçalho SOAP. Pra quem precisar segue o exemplo:


AAuthHeader := AuthHeader.Create;
ARio := THTTPRIO.Create(nil);

AAuthHeader.Username := usuario;
AAuthHeader.Password := senha;

ARio.SOAPHeaders.Send(AAuthHeader);
GOSTEI 0
POSTAR