У меня есть компонент TIDHttp (Indy), извлекающий веб-сайт, откуда я могу получить текст html для анализа и отображения данных в форме delphi.Как выполнить функцию javascript на delphi TIDHttp (indy)?
Код работает нормально, но когда найдено более 10 записей, на веб-сайте отображается ссылка на функцию javascript Next(), которая загружает следующие 10 записей и так далее.
Есть ли что-то, что я могу сделать с TIDHttp для выполнения функции next()?
Код I'm, используя для retreave HTML-текст выглядит следующим образом:
procedure TForm1.ObtemStringsCorreio(aParamEntrada:string; var aRetorno:TStringList);
var
_ParamList : TStringList;
begin
_ParamList := TStringList.Create;
_ParamList.Add('cepEntrada=' + aParamEntrada);
_ParamList.Add('tipoCep=ALL');
_ParamList.Add('cepTemp=');
_ParamList.Add('metodo=buscarCep');
try
aRetorno.Text := idhtp1.Post(cEngineCorreios, _ParamList);
mmo1.Lines.Clear;
mmo1.Text := aRetorno.Text;
finally
_ParamList.Free;
end;
end;
Кажется, что вы пытаетесь очистить веб-сайт для контента. Вы уверены, что нет доступных API-интерфейсов, которые позволят вам напрямую обращаться к данным? Скребок - это метод последней инстанции, обычно обескураженный владельцами сайтов, и он, естественно, неустойчив. –
См. Возможно: [Комо-автобус um endereço por CEP nos Correios?] (Http://pt.stackoverflow.com/questions/400/como-buscar-um-endere%C3%A7o-por-cep-nos-correios) –
Спасибо за ответ. Я уже прочитал эти сообщения. Они используют неофициальную базу данных «Correios», а «Correios» не предлагают веб-сервисы. –