Pesquisar na Comunidade
Mostrando resultados para as tags ''scrap''.
Encontrado 2 registros
-
Procuro um preço numa página web: Eis o html da página: arial,serif;font-size:18px;">9,95€</span></td> O meu código regex='arial,serif;font-size:18px;">(.+?) ' pattern=re.compile(regex) price=pattern.findall(str(htmltext)) o valor de price é [] por causa do simbolo euro. Como apanhar o valor 9,95? Cumprimentos Mário Lopes
-
Viva Graças a este fórum (Jhonas) consegui fazer scrap a uma página web. Deixo o código de seguida porque pode ser útil para alguém. A minha questão é se esta forma de scrap pode ser otimizada porque para ficheiros web com muitas linhas de código (na ordem dos 2000) este processo é um pouco lento. O que este programa faz é ler linha a linha o ficheiro web e procurar a correspondência. Há alguma otimização possível? Obrigado Mario procedure Tfrmscrapalternativos.Button1Click(Sender: TObject); var total:integer; lReader: TStringReader; linha,procura:string; begin lHTTP := TIdHTTP.Create(nil); lHTTP.Request.UserAgent :='Mozilla/5.0 (Windows NT 6.1; WOW64; rv:12.0) Gecko/20100101 Firefox/12.0'; zquery1.First; total:=zquery1.RecordCount; for j := 1 to total do begin lReader := TStringReader.Create(lHTTP.Get(zquery1.FieldByName('link1').AsString)); procura:='#CC0000;">'; repeat linha := lReader.ReadLine; if AnsiContainsStr(linha,procura) then begin //faz a as tarefas break; end; until lReader = Nil; zquery1.Next; end; showmessage('terminei'); end;