11 respuestas en este tema

[eduarcol]

Saludos

Estoy trabajando con una intranet, donde se guardan ciertas frases en una BD firebird, la idea es que cuando el sistema abra en las sucursales se conecte a esta intranet y actualice la lista de las frases en su bd.

Que opciones puedo manejar para no generar una conexión directa a Firebird con el ZConnection. Es que noto que en ocasiones alenta la apertura.  Alguna idea que pueda descargarlo como texto desde la pagina o XML o como se puede hacer mas rápido?

[Faust]

Lo primero que se me ocurre es una VPN

Saludos

[eduarcol]

También probé con una VPN pero sucede lo mismo, sera que hay una opción para transmitir solo texto desde una pagina Html

[egostar]

Y porque no evaluas un webservice donde consultes las nuevas frases y te las regrese para agregarlas a la base de datos local.

Salud OS

[Marc]

¿ Cuan grande es el archivo de frases ?. Si no es muy grande, entonces puedes hacer que cada día se exporte esa base de datos a un archivo externo (por ejemplo en formato valores separados por coma, o XML que también está muy estandarizado), y dejas ese archivo en una carpeta del servidor de Intranet, a la que puedan acceder las sucursales por FTP.

[eduarcol]

Buenas sugerencias, probare las dos a ver que tal

[eduarcol]

Hola a todos, estoy probando con el webservice, ya hice el servidor, pero no hayo como registrarlo en APACHE, ya que el tuto de eliseo esta en IIS

Voy a probar con la opcion de Marc, pero en lugar de un archivo una pagina PHP que pueda ser leida desde un browser a ver como sale.

[Faust]

Se me ocurre crear un rss al vuelo... es decir haces un php que haga la consulta aleatoria a tu base de datos mySQL donde guardas tus frases y que te regrese una estructura xml con la frase... así podrás leerla desde el xml como si fuera rss

[eduarcol]

He visto lo de la xml pero trabajo con firebird y no se como pasarlo a XML desde php.  Alguien sabe como hacer para leer el contenido de una pagina web desde delphi?

[Kipow]

No deberia ser tan lenta la conexion directa? que enlaces tenes en los puntos?, si eso falla yo generaria un archivo xml o bien un archivo de texto con las sentencias update or insert comprimido y lo trasladaria por la vpn al otro punto, de ahi pues cargarlo a la BD.

[felipe]

Leí algo de hacerlo con Sockets, pero según parece retorna la página en versión texto.

Tendrías que hacer pruebas para tratar de eliminar caracteres o etiquetas que se mezclen con el texto normal.


Saludos!

[eduarcol]

Lo logre asi

delphi

procedure TForm1.WBDocumentComplete(
  Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
var
    iall : IHTMLElement;
begin
   if Assigned(wb.Document) then
   begin
     iall := (wb.Document AS IHTMLDocument2).body;
 
     while iall.parentElement <> nil do
     begin
       iall := iall.parentElement;
     end;
     memo1.Text := iall.outerHTML;
   end;
end;

No me importa los TAG porque la pagina se generaria sin ellos, al menos eso pienso dejenme ver como queda.