Digitação automática em site

Delphi

18/05/2013

Bom dia.
Alguem teria alguma rotina que possa capturar um site e preencher automaticamente os campos pelo Delphi.
Grato
Roberto Rodrigues
Rrodrigues_sts

Rrodrigues_sts

Curtidas 0

Respostas

Diogenes Sampaio

Diogenes Sampaio

18/05/2013

Olá rrodrigues_sts,
Verifique o código fonte da página web, pegue os nomes dos campos e monte a url.

Por exemplo: suponha que a página web que você deseja enviar contenha o seguinte código:

<form action="cadastro" method="get">
<input type="text" id="nome" /> 
<input type="text" id="endereco" />
<input type="text" id="telefone" /> 
<input type="submit" />  
</form>


A url ficaria assim:
www.nomedosite.com.br/cadastro?nome=VALOR_DO_NOME&endereco=VALOR_DO_ENDERECO&telefone=VALOR_TELEFONE


Pesquise na net como fazer requisições http em delphi, existem vários tutos por ai.
Eu acredito que a maneira mais fácil de fazer uma requisição HTTP seria utilizar o componente TIdHTTP da paleta indy.

com indy seu código ficaria assim:
var
  HttpResponse: TStringStream;
begin
  try
    HttpResponse := TStringStream.Create;
    IdHTTP1.Get('http://www.devmedia.com.br',HttpResponse);
    ShowMessage(HttpResponse.DataString);
  finally
    HttpResponse.Free;
  end;


Espero ter ajudado.
GOSTEI 0
Rrodrigues_sts

Rrodrigues_sts

18/05/2013

Diogenes
Ajudou e muito.

Obrigado
GOSTEI 0
POSTAR