FTP(vfpconnection)
Edwin Duran
Edwin Duran
El martes, 6 de diciembre de 2016, 15:50:54 (UTC-4), Edwin Duran escribió:
Buenas TardesEstoy probando la librería vfpconnection y no he podido ponerlo a funcionar bajando un archivo con el siguiente ejemplo, el usuario y clave lo coloco bien por que con filezilla trabaja. podrian darme alguna orientacion
SET LIBRARY TO (LOCFILE("vfpconnection.fll","FLL"))=SetConnectTimeout(60000)=SetResponseTimeout(60000)
?FTPPut("E:\C\hydexpedientep.exe", "FTP://usuario:clave@files.000webhost.com/update/hydexpedientep.exe.zip", "MyCommand()")
Daniel Sánchez
Investigación y Desarrollo
Reset Software & Sistemas
Móvil +051-949398047 RPM #948615385
Trujillo - Perú
Douglas Sánchez
Daniel Sánchez
Alfonso Arias Lemas
Hola Daniel, yo uso este procedimiento adaptado para mi….
PROCEDURE ELIMINAR_FTP
LPARAMETERS FICHERO,S_FTP
LOCAL LL
LOCAL ARRAY aryFTPCommands(1)
aryFTPCommands(1) = "DELE "+LOWER(FICHERO)
SetConnectTimeout(9999999)
SetResponseTimeout(9999999)
LL=FTPCommands(S_FTP,@aryFTPCommands,"MyTrace()")
RETURN LL
ENDPROC
FUNCTION MyTrace()
**********
ENDFUNC
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:cl...@dominio.com
Suerte.
Saludos,
Alfonso
Edwin Duran
El martes, 6 de diciembre de 2016, 15:50:54 (UTC-4), Edwin Duran escribió:
Buenas TardesEstoy probando la librería vfpconnection y no he podido ponerlo a funcionar bajando un archivo con el siguiente ejemplo, el usuario y clave lo coloco bien por que con filezilla trabaja. podrian darme alguna orientacion
SET LIBRARY TO (LOCFILE("vfpconnection.fll","FLL"))=SetConnectTimeout(60000)=SetResponseTimeout(60000)
?FTPPut("E:\C\hydexpedientep.exe", "FTP://usuario:clave@files.000webhost.com/update/hydexpedientep.exe.zip", "MyCommand()")
Daniel Sánchez
*****************************************************************
*!* FTP Commands Example
********************************************************************
*!* Rename FTP Directory
SET LIBRARY TO (LOCFILE(“vfpconnection.fll”,“FLL”))
aryFTPCommands(1) = “CWD /”
aryFTPCommands(2) = “PWD”
aryFTPCommands(3) = “RNFR MyDir”
aryFTPCommands(4) = “RNTO RenamedMyDir”
?FTPCommands(“FTP://username:pass...@somedomain.com/”, @aryFTPCommands, “MyTrace()”)
*!* ?FTPSCommands(“FTPS://username:pass...@somedomain.com/”, @aryFTPCommands, “MyTrace()”)
SET LIBRARY TO
Hola Daniel, yo uso este procedimiento adaptado para mi….
PROCEDURE ELIMINAR_FTP
LPARAMETERS FICHERO,S_FTP
LOCAL LL
LOCAL ARRAY aryFTPCommands(1)
aryFTPCommands(1) = "DELE "+LOWER(FICHERO)
SetConnectTimeout(9999999)
SetResponseTimeout(9999999)
LL=FTPCommands(S_FTP,@aryFTPCommands,"MyTrace()")
RETURN LL
ENDPROC
FUNCTION MyTrace()
**********
ENDFUNC
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:clave@dominio.com
Suerte.
Saludos,
Alfonso
Alfonso Arias Lemas
Hola Daniel.
Esse ejemplo que temandé trabaja en mi servidor, montado por mi en Windows com FileZilla.
Como nombre lo indica “ELIMINAR_FTP “ lo que hace esse procedimento es eliminar archivos del FTP. Eso no era lo que buscabas???
Saludos.
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] Em nome de Daniel Sánchez
Enviada: 8 de dezembro de 2016 11:09
Para: Comunidad de Visual Foxpro en Español
Assunto: Re: [vfp] FTP(vfpconnection)
En el ejemplo se ve que se puede enviar comandos, mi pregunta es el ejemplo envia comandos para un servidor linux o me equivoco, en mi caso es un servidor windows el comando debe ser de acuerdo al tipo de servidor, aqui el ejemplo:
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:cl...@dominio.com
Suerte.
Saludos,
Alfonso
Daniel Sánchez
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:clave@dominio.com
Suerte.
Saludos,
Alfonso
Alfonso Arias Lemas
Hola Daniel.
El protocolo FTP es un estándar e incluso el FileZilla tiene su versión para Linux creo.
Saludos.
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] Em nome de Daniel Sánchez
Enviada: 8 de dezembro de 2016 14:17
Para: Comunidad de Visual Foxpro en Español
Assunto: Re: [vfp] FTP(vfpconnection)
Si mi duda era si era un comando para windows o linux, por lo demás lo voy a implementar.
Saludos
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:cl...@dominio.com
Suerte.
Saludos,
Alfonso
Edwin Duran
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:clave@dominio.com
Daniel Sánchez
Hola Daniel, yo uso este procedimiento adaptado para mi….
PROCEDURE ELIMINAR_FTP
LPARAMETERS FICHERO,S_FTP
LOCAL LL
LOCAL ARRAY aryFTPCommands(1)
aryFTPCommands(1) = "DELE "+LOWER(FICHERO)
SetConnectTimeout(9999999)
SetResponseTimeout(9999999)
LL=FTPCommands(S_FTP,@aryFTPCommands,"MyTrace()")
RETURN LL
ENDPROC
FUNCTION MyTrace()
**********
ENDFUNC
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:clave@dominio.com
Suerte.
Saludos,
Alfonso
Daniel Sánchez
Amigo estoy usando el comando ftpcommands de la libreria vfpconnection.fll, al ejecutar la linea de envió del comando, me indica que no hay memoria para ejecutar dicho comando, a que se debe dicho mensaje. Aquí parte del código de donde se envió al servido.
LOCAL ARRAY aryFTPCommands(2)aryFTPCommands(1) = [DEL "]+cfileNameXML+["]aryFTPCommands(2) = [DEL "]+cfileNamePDF+["]SetConnectTimeout(9999999)SetResponseTimeout(9999999)
LL=FTPCommands(cFTP,@aryFTPCommands)
Deseo eliminar 2 archivos un xml y un pdfSaludos
El 8 de diciembre de 2016, 4:56, Alfonso Arias Lemas <alfonsoa...@gmail.com> escribió:
Hola Daniel, yo uso este procedimiento adaptado para mi….
PROCEDURE ELIMINAR_FTP
LPARAMETERS FICHERO,S_FTP
LOCAL LL
LOCAL ARRAY aryFTPCommands(1)
aryFTPCommands(1) = "DELE "+LOWER(FICHERO)
SetConnectTimeout(9999999)
SetResponseTimeout(9999999)
LL=FTPCommands(S_FTP,@aryFTPCommands,"MyTrace()")
RETURN LL
ENDPROC
FUNCTION MyTrace()
**********
ENDFUNC
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:cl...@dominio.com
Alfonso Arias Lemas
Hola Daniel.
¿Por qué no usas el comando como te lo mando?
aryFTPCommands(1) = "DELE "+LOWER(cfileNameXML)
No se si tiene algo que ver pero experimenta e además a modo de teste coloca solo un elemento del arreglo. Cuando yo voy a eliminar archivos yo lo hago uno por uno. Otra cosa crea un procedimiento vacío llamado MyTrace() y colocalo como parámetro en el comando FTPCommands que te falta.
Otra cosa cada ves que yo gravo un fichero en un FTP lo coloco sin caracteres especiales y sin dejar espacios, no se si esto influye pero yo lo hago para no corres riesgo de posibles errores.
Saludos.
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] Em nome de Daniel Sánchez
Enviada: 9 de dezembro de 2016 02:39
Para: Comunidad de Visual Foxpro en Español
Assunto: Re: [vfp] FTP(vfpconnection)
Amigo estoy usando el comando ftpcommands de la libreria vfpconnection.fll, al ejecutar la linea de envió del comando, me indica que no hay memoria para ejecutar dicho comando, a que se debe dicho mensaje. Aquí parte del código de donde se envió al servido.
Donde FICHERO seria el nombre del fichero a eliminar y S_FTP seria las credenciales para acceder al FTP como ftp://usuario:cl...@dominio.com
Suerte.
Saludos,
Alfonso
Esteban H.
Hola Alfonso.
No sabía de un comando p borrar en FTP con la librería VFPConnection.fll.
Probé tu rutina y me funcionó perfecto. Yo utilizo un sito de Ftp p actualizar algunos programas, no había tenido la necesidad de borrar, pero esta bueno saber cómo hacerlo.
Gracias x compartirla.
Esteban.
Alfonso Arias Lemas
Hola Esteban.
Ademas de este comando DELETE existen muchos otros tales como:
Comandos FTP
Comando y argumentos | Acción que realiza |
open servidor | Inicia una conexión con un servidor FTP. |
close o disconnect | Finaliza una conexión FTP sin cerrar el programa cliente. |
bye o quit | Finaliza una conexión FTP y la sesión de trabajo con el programa cliente. |
cd directorio | Cambia el directorio de trabajo en el servidor. |
delete archivo | Borra un archivo en el servidor |
mdelete patrón | Borra múltiples archivos basado en un patrón que se aplica al nombre. |
dir | Muestra el contenido del directorio en el que estamos en el servidor. |
get archivo | Obtiene un archivo |
noop No Operation | Se le comunica al servidor que el cliente está en modo de no operación, el servidor usualmente responde con un «ZZZ» y refresca el contador de tiempo inactivo del usuario. |
mget archivos | Obtiene múltiples archivos |
hash | Activa la impresión de caracteres # a medida que se transfieren archivos, a modo de barra de progreso. |
lcd directorio | Cambia el directorio de trabajo local. |
ls | Muestra el contenido del directorio en el servidor. |
prompt | Activa/desactiva la confirmación por parte del usuario de la ejecución de comandos. Por ejemplo al borrar múltiples archivos. |
put archivo | Envía un archivo al directorio activo del servidor. |
mput archivos | Envía múltiples archivos. |
pwd | Muestra el directorio activo en el servidor. |
rename archivo | Cambia el nombre a un archivo en el servidor. |
rmdir directorio | Elimina un directorio en el servidor si ese directorio está vacío. |
status | Muestra el estado actual de la conexión. |
bin o binary | Activa el modo de transferencia binario. |
ascii | Activa el modo de transferencia en modo texto ASCII. |
! | Permite salir a línea de comandos temporalmente sin cortar la conexión. Para volver, teclear exit en la línea de comandos. |
? nombre de comando | Muestra la información relativa al comando. |
? o help | Muestra una lista de los comandos disponibles. |
append nombre del archivo | Continua una descarga que se ha cortado previamente. |
bell | Activa/desactiva la reproducción de un sonido cuando ha terminado cualquier proceso de transferencia de archivos. |
glob | Activa/desactiva la visualización de nombres largos de nuestro PC. |
literal | Con esta orden se pueden ejecutar comandos del servidor de forma remota. Para saber los disponibles se utiliza: literal help. |
mkdir | Crea el directorio indicado de forma remota. |
quote | Hace la misma función que literal. |
send nombre del archivo | Envía el archivo indicado al directorio activo del servidor. |
user | Para cambiar nuestro nombre de usuario y contraseña sin necesidad de salir de la sesión ftp. |
Saludos,
Alfonso
Esteban H.
Muchas Gracias!!!!
Saludos
Esteban Bastida
LPARAMETERS FICHERO,S_FTP
*Subo el Archivo por FTP FileZilla al Servidor en Hostinger
SET LIBRARY TO (LOCFILE("vfpconnection.fll","FLL"))
LOCAL ARRAY aryFTPCommands(1)
aryFTPCommands(1) = "DELE "+LOWER(FICHERO)
SetConnectTimeout(9999999)
SetResponseTimeout(9999999)
LL=FTPCommands(S_FTP,@aryFTPCommands,"MyTrace()")
RETURN LL
ENDPROC
FUNCTION MyTrace()
**********
ENDFUNC
nkris...@gmail.com
Esteban Bastida
Buenas tardes nKris. Muchas gracias, con el Link que me enviaste logré ejecutar FTPCommands; tenías razón era un tema de la versión de la fll. Te pido una última ayuda, sabes que ejecuta el comando DELE pero no lo elimina del servidor, devuelve .F., me aseguré de tener bien asignada S_FTP y también el nombre en FICHERO con el archivo a borrar. Podrá ser que el nombre de archivo tiene 23 caracteres y es muy grande, aunque no creo que sea eso, o que el archivo se encuentra en una subcarpeta y no en el directorio raíz, aunque uso el mismo path que cuando grabo con FTPPut.
No sé como poder tracear cual es el error por el cual no encuentra el archivo y no lo borra o cual otro error puede ser ya que es solo ejecutar el comando.
Desde ya te agradezco mucho por tu atención.
Saludos.
Esteban.
--
Blog de la Comunidad Visual FoxPro en Español http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de
Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes,
envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/publicesvfoxpro/cac47e03-562d-4621-b773-4e171f67eb84n%40googlegroups.com.
