Descargar parte de una web

[roman]

Empezado por Emilio

Bicho gracias por la respuesta, no es ese el camino pero se agradece,

Y ¿puede saberse por qué no es ése el camino? Al menos conduce a donde quieres :

Código Delphi [-]
uses mshtml;

...

var
  Document: IHTMLDocument2;
  HTMLElement: IDispatch;
  TextArea: IHTMLTextAreaElement;

begin
  Document := WebBrowser.Document as IHTMLDocument2;
  HTMLElement := Document.all.item('algo', 0);

  if Assigned(HTMLElement) then
  begin
    if Supports(HTMLElement, IHTMLTextAreaElement, TextArea)then
      ShowMessage(TextArea.value);
  end;
end;

// Saludos

[dec]

Hola,

Empezado por Román

Y ¿puede saberse por qué no es ése el camino? Al menos conduce a donde quieres :

Te digo yo que hay muchos caminos para llegar a Roma...

Empezado por Mario

Y no hay razones para no usarlas en Delphi!

http://regexpstudio.com/TRegExpr/TRegExpr.html

Excelente la pinta que tiene ese componente. Gracias por la información.

[*Emilio*]

Empezado por roman

Y ¿puede saberse por qué no es ése el camino? Al menos conduce a donde quieres :

Razón tienes roman, creo que dije eso por error, al entrar al hilo vi a la vez la respuesta de seoane que me sonaba al código que andaba buscando y ya había visto alguna vez algo parecido por tanto me fijé en esa respuesta como solución, la de Bicho hablaba sobre TWebBrowser y lo descarte sin tan siquiera fijarme detenidamente, lo cual está muy mal por mi parte, lo reconozco.

Bicho: rectifico, lamento no haberme fijado mejor.

Muy pocas veces hago uso del foro para emitir preguntas y realmente estoy sorprendido de la cantidad de respuestas válidas que he obtenido, seguramente alguna vez habéis preguntado estando en una ciudad desconocida por una calle y el nativo no sólo se ha limitado en indicarte el trayecto sino que además se ha tomado la molestia de acompañarte para que no te pierdas, pues algo así creo estar sintiendo, INCREIBLE, gracias a todos

Bueno pues debo decir que he puesto en práctica dos de las opciones que se ofrecen en el hilo, la de seoane y la de roman en PHP, ambas funcionan de coña y el resultado es este http://www.brico-pc.com/tienda/artic...f=VBCIMPACTOEM

La web no está terminada, en breve...

[[Bicho]]

Gracias chicos por defenderme!!

Como ya dije no estoy muy puesto en tema, pero despues de haber leido las respuestas creo que una idea si estaba dando por lo menos relacionada..

Emilio me has hecho dañoo

Es coña, no pasa nada

Un saludo a todos y vamos a ver que hay en la tienda virtual.

Por cierto no tendrás o podrías conseguir este procesador: AMD socket AM2 de 64bits 3800+ dual-core, que es lo que me esta jorobando el verano...

[*Emilio*]

Empezado por Bicho

Emilio me has hecho dañoo

Pues te pones una tirita

Empezado por Bicho

Por cierto no tendrás o podrías conseguir este procesador: AMD socket AM2 de 64bits 3800+ dual-core, que es lo que me esta jorobando el verano...

Creo que esto es lo que estás buscando.

http://www.brico-pc.com/tienda/artic...AMD3800/AM2BOX

Aquí tienes unos cuantos similares.

[[Bicho]]

Empezado por Emilio

Creo que esto es lo que estás buscando.

http://www.brico-pc.com/tienda/artic...AMD3800/AM2BOX

Ya lo habia visto, pero no pone que sea dual-core no? Lo es?, Esta disponible?

Los otros son un socket anterior al AM2 i me interesa ahora mismo el nuevo.

Gracias de todos modos.

Saludos

Edito: he visto que en la foto, si pone que sea dual-core, así que si la foto no engaña es el que busco

[*Emilio*]

Empezado por Bicho

Ya lo habia visto, pero no pone que sea dual-core no? Lo es?, Esta disponible?

Los otros son un socket anterior al AM2 i me interesa ahora mismo el nuevo.

Con socket AMD2 sólo hay disponibles el 3200 y el 3500

http://www.brico-pc.com/tienda/artic...AMD3200/AM2BOX
http://www.brico-pc.com/tienda/artic...AMD3500/AM2BOX

De todas formas todavía no tengo nada en stock, la tienda todavía no está abierta, pero se pueden pedir.

[[Bicho]]

Pero esto no son dual-core (estoy exigente hoy eh? ya lo sé)
de todas maneras el 3200 tiene buena pinta.

Creo que sino llega el mio a principios de septiembre me dicidiré por este y ya más adelante lo cambiaré

Esta gente de AMD saca el procesador nuevo (socket AM2 y dual-core) a mediados de Julio, el que quiero vale 130€ y en agosto cierran por vacaciones o no producen los suficientes o que, la cuestión es que por todo me ponen como escusa que al distribuidor no le llega

En fin ya veremos...

Saludos

[chelox]

Hola, acavo de poner un mensaje de ayuda en este foro de internet, pero leyendo este tema creo que acá esta mi solución, y era algo tan simple como lo que puso bicho

MEMO1.Text := WebBrowser1.OleObject.Document.body.innerHTML;

Mi problema lo resolvería con este compenente creo yo porque al sitio que estoy consultando tiene algunos redireccionamientos.
Ahora lo que yo necesito es abrir el sitio, pero enviando algunos parámetros por POST.
Me parece que esto si se puede con este componente. Veo que por aca la tienen reclara con este tema, asi que espero alguna ayuda.
Luego una vez que trajo los datos y haga todos los redireccionamientos que quiera recién ahí examinaría el código HTML que con eso ya estaría resuelto el problema.

Aca está lo que quiero, que puse en otro mensaje:
Necesito hacer una consulta a un sitio web publico, donde envio unas variables por POST y recibo todo un HTML con los resultados.
Estuve renegando un poco con DELPHI hasta que lo logré unsando un componente IdHTTP.
Aparentemente funciona pero no me trae resultados, es como que hace una consulta nula.
Gracias a este componte me detecta que tiene un redireccionamiento no se si esto pude influir, yo creo que no. Porque a esto mismo lo hice con flash, envio y recibe todo bien, me trae la consulta correcta, pero me corta el HTML, no me lo trae completo.
Yo creo que es posible hacerlo, pero no se si estoy lejos o cerca, lo que se me había ocurrido era como hacer un internet explorer propio, donde yo pueda tener acceso al codigo html.
Pero no manejo casi nada los componente de internet de delphi, yo creo que a esto un experto lo saca al instante.
Espero que alguien me pueda ayudar.

Aca pongo el ejemplo hecho con delphi 7, por si alguien quiere investigar.
Gracias.

www.dbhost.com.ar/pruebaindy.zip

[Roger007]

Wenas.

Vi este hilo y me intereso el tema de poder sacar información directamente de una Web. Hice pruebas con los ejemplos que pusisteis y funcionaban perfectamente. (incluso poniendo parámetros para hacer las búsquedas, no sabia que se podía hacer)

Ahora llega mi problema: Llevo una temporada jugando al Travian (juego por Web de gestionar los recursos de tu aldea y hacer soldados, como un civilization pero mas sencillito y en Web). Tiene una opción de sacar un pequeño mapa de tu zona con tu aldea en el centro y poder ver las aldeas que tienes mas cercanas. Además puedes ver algo de información de las aldeas vecinas. Esta seria la información que me interesaría para sacar unas estadísticas. Ya he visto la estructura del html y creo que no tendré problemas para coger esos datos.

El problema es que para entrar en la Web me pide usuario y password y no consigo pasar de ahí al usar vuestro ejemplos (cambiando los parámetros por supuesto, poniendo mi usuario y mi password). (creo que tal vez sea algo de las cookies pero no se entrar en ese tema)

He creado una aldea de pruebas por si queréis ver como es la web y los datos pide.

Web: http://s3.travian.net/login.php
Usuario: prueba_roger
Password: 12345678

procedure TForm1.Button2Click(Sender: TObject);
var
data: TIdMultiPartFormDataStream;
begin
data := TIdMultiPartFormDataStream.Create;
try
{ add the used parameters for the script }
data.AddFormField('e7a9175','prueba_roger');
data.AddFormField('e9cb9d1','12345678');

Memo1.Lines.Text := IdHTTP1.Post('http://s3.travian.net/dorf1.php', data);
finally
data.Free;
end;
end;

Un Saludo, Roger.

[roman]

Empezado por Emilio

Muy pocas veces hago uso del foro para emitir preguntas y realmente estoy sorprendido de la cantidad de respuestas válidas que he obtenido, seguramente alguna vez habéis preguntado estando en una ciudad desconocida por una calle y el nativo no sólo se ha limitado en indicarte el trayecto sino que además se ha tomado la molestia de acompañarte para que no te pierdas, pues algo así creo estar sintiendo, INCREIBLE, gracias a todos

¡Hombre, Emilio! ¡Qué estás descubriendo al ClubDelphi! Y no sabes, tiene un administrador estupendo que día con día renueva y mantiene el sitio. ¡Ah! Pero si tú eres el administrador!

// Saludos

[[Lepe]]

Emilio, Ese sentimiento es el que hace perdurar a tu criatura (ClubDelphi)

Saludos