Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-02-2008
Avatar de chrids506
chrids506 chrids506 is offline
Miembro
 
Registrado: abr 2006
Posts: 70
Poder: 12
chrids506 Va por buen camino
Descargar archivos del Servidor

Saludos Caballeros, tengo un pequeño problema, tengo una página en php que lee la información desde archivos xml, estos archivos son generados desde delphi y subidos con el siguiente código:

Código Delphi [-]
  with IdFTP1 do try
    Connect;
  finally
    if Connected then begin
          IdFTP1.Put(EIMA1.Text, ExtractFileName(EIMA1.Text));
    end;
  end;
   IdFTP1.Disconnect;

Donde EIMA1 Representa un edit que contiene la ruta del archivo, hasta aquí todo bien, sin embargo lo que quiero hacer es bajar todos los archivos xml del servidor cada vez que se cargue el programa, y así lograr ya sea editarlos o a la hora de crear uno nuevo saber que ya existe uno con el mismo nombre haciendo la comprobación en local, en sintesis, quiero descargar todos los archivos xml en una ruta en un servidor, espero que puedan ayudarme, gracias

Nota:
Delphi 7
todos los documentos se encuentran en la raíz de la cuenta con que se conecta el programa
Servidor Propio con todos los privilegios

Última edición por chrids506 fecha: 04-02-2008 a las 19:51:17. Razón: código quedó mal por utilizar primero la vista previa
Responder Con Cita
  #2  
Antiguo 04-02-2008
Avatar de chrids506
chrids506 chrids506 is offline
Miembro
 
Registrado: abr 2006
Posts: 70
Poder: 12
chrids506 Va por buen camino
De otra manera

Ustedes creen que sea mejor en lugar de tener 500 archivos xml de un bloque, tener 1 archivo xml de 500 bloques? osea, no se hará la carga mas pesada?
no se hará demasiado grande?
Responder Con Cita
  #3  
Antiguo 04-02-2008
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.243
Poder: 21
jachguate Va por buen camino
Cita:
Empezado por chrids506 Ver Mensaje
quiero descargar todos los archivos xml en una ruta en un servidor, espero que puedan ayudarme, gracias
[pseudocodigo]
inicio
AbrirConexion;
ObtenerListaDeArchivosEn(Lista);
For I := 0 to Lista.Count - 1 do
BajarArchivo(Lista[i]);
fin;
[/pseudocódigo]

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #4  
Antiguo 04-02-2008
Avatar de chrids506
chrids506 chrids506 is offline
Miembro
 
Registrado: abr 2006
Posts: 70
Poder: 12
chrids506 Va por buen camino
Gracias

Gracias, pero tenés idea de como hacer esto?:

ObtenerListaDeArchivosEn(Lista);
Responder Con Cita
  #5  
Antiguo 04-02-2008
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.243
Poder: 21
jachguate Va por buen camino
De la ayuda de delphi:

Cita:
Empezado por Indy help
Declaration
Código Delphi [-]
procedure List; overload;
Summary
Retrieves a list of files and directories on the FTP server.
Description
.NET Overload
List is an overloaded procedure used to request a list of files or directories in the current directory on the FTP server.

Unlike overloadeed variants of the List method, no file specifier is used and file details are always returned. List calls the overloaded List method using an Unassigned (Nil) value for the storage of the textual responses that make up the directory listing.
...
Textual responses to the FTP command are captured and stored in the ListResult property. The value of the UsedMLS property is set to False to indicate that the MLST parser should not be used on textual values in the ListResult property.

List will clear any existing entries found in the DirectoryListing property, and free the collection used for the structured directory listing. The collection is recreated and values in the ListResult are parsed into collection items on the initial read access to the DirectoryListing property.

See Also
ListResult, DirectoryListing, List, CanUseMLS, UsedMLS, ExtListDir, TransferType
Class
TIdFTP
Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #6  
Antiguo 04-02-2008
Avatar de chrids506
chrids506 chrids506 is offline
Miembro
 
Registrado: abr 2006
Posts: 70
Poder: 12
chrids506 Va por buen camino
Gracias caballero era exactamente lo que buscaba
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Descargar Archivos Deiv HTML, Javascript y otros 6 25-12-2007 08:52:55
¿Descargar Archivos de Sitios con Contraseña? JXJ Varios 0 01-10-2007 23:21:11
¿como descargar archivos por fecha y hora.? JXJ Firebird e Interbase 3 07-09-2007 20:30:38
Descargar archivos mediante un formulario pampitasnowman PHP 17 15-05-2007 16:39:04
Descargar archivos adjuntos con NMPOP3 gaska OOP 0 30-11-2005 18:09:54


La franja horaria es GMT +2. Ahora son las 17:22:35.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi