SSIS, secuencia de comandos y ftp

20/11/2009 - 12:16 por José Mª Fueyo | Informe spam
Hola a todos.
Sigo peleandome con los paquetes SSIS, y bueno poco a poco
avanzando ;-)
Me encuentro con algo que no entiendo por más que lo intento. He
creado un paquete con una tarea de secuencia de comandos, que
básicamente busca unos archivos en un sitio ftp para bajarlos,
tratarlos, renombrarlos y volverlos a subir (ya que no hay posibilidad
sencilla de renombar ficheros, he decidido hacerlo así).
Bajar los ficheros y tratarlos, no hay problema. El problema es que,
por más que lo intento, no consigo subir el fichero renombrado. ¿Algo
se me escapa? os muestro el código que uso, a ver sí veis algo que se
me escape a mi
<pego>
If Archivos.Length = 1 Then
'Recupero el nombre, sin ruta de acceso, del archivo
Archivo = Split(Archivos(0), "\")
Dim i As Integer = UBound(Archivo)
'La copia para procesar
File.Copy(Archivos(0), sDirLocal &
"ServRealizados.txt", True)
'Preparo proceso para subir al ftp, marcado como
tratado
File.Copy(Archivos(0), sDirLocal & "Tratado_" & Archivo
(i), True)
File.Delete(Archivos(0))

'ftp.DeleteFiles(ArchivosAObtener)

Dim ASubir(0) As String
ASubir(0) = "BGTratado_" & Archivo(i)
System.Windows.Forms.MessageBox.Show(ASubir(0))

ftp.SendFiles(ASubir, "", True, True)

'Archivo(i) = "Tratado_" & Archivo(i)

'File.Delete(sDirLocal & "BGTratado_" & Archivo(i))
ftp.Close()
Dts.TaskResult = Dts.Results.Success
Else
ftp.Close()
Dts.TaskResult = Dts.Results.Failure
End If
</pego>
¿Alguna idea, al respecto, alguna sugerencia, crítica...?
Gracias.

Salu2,
José Mª Fueyo

Preguntas similare

Leer las respuestas

#1 Maxi Accotto
20/11/2009 - 20:39 | Informe spam
Hola, y cual es el error?



Maxi Accotto
MVP en SQL Server
http://blog.maxiaccotto.com

"José Mª Fueyo" wrote in message
news:
Hola a todos.
Sigo peleandome con los paquetes SSIS, y bueno poco a poco
avanzando ;-)
Me encuentro con algo que no entiendo por más que lo intento. He
creado un paquete con una tarea de secuencia de comandos, que
básicamente busca unos archivos en un sitio ftp para bajarlos,
tratarlos, renombrarlos y volverlos a subir (ya que no hay posibilidad
sencilla de renombar ficheros, he decidido hacerlo así).
Bajar los ficheros y tratarlos, no hay problema. El problema es que,
por más que lo intento, no consigo subir el fichero renombrado. ¿Algo
se me escapa? os muestro el código que uso, a ver sí veis algo que se
me escape a mi
<pego>
If Archivos.Length = 1 Then
'Recupero el nombre, sin ruta de acceso, del archivo
Archivo = Split(Archivos(0), "\")
Dim i As Integer = UBound(Archivo)
'La copia para procesar
File.Copy(Archivos(0), sDirLocal &
"ServRealizados.txt", True)
'Preparo proceso para subir al ftp, marcado como
tratado
File.Copy(Archivos(0), sDirLocal & "Tratado_" & Archivo
(i), True)
File.Delete(Archivos(0))

'ftp.DeleteFiles(ArchivosAObtener)

Dim ASubir(0) As String
ASubir(0) = "BGTratado_" & Archivo(i)
System.Windows.Forms.MessageBox.Show(ASubir(0))

ftp.SendFiles(ASubir, "", True, True)

'Archivo(i) = "Tratado_" & Archivo(i)

'File.Delete(sDirLocal & "BGTratado_" & Archivo(i))
ftp.Close()
Dts.TaskResult = Dts.Results.Success
Else
ftp.Close()
Dts.TaskResult = Dts.Results.Failure
End If
</pego>
¿Alguna idea, al respecto, alguna sugerencia, crítica...?
Gracias.

Salu2,
José Mª Fueyo
Respuesta Responder a este mensaje
#2 José Mª Fueyo
22/11/2009 - 19:52 | Informe spam
Hola Maxi
El problema era que por mucho que lo ejecutaba, no me subía el fichero en
cuestión.
Al final de la mañana del viernes, y sín hacer nada, lo subió (¿?).
En fin, veremos que me espera mañana :-S ;-)

Salu2
Jose Mª Fueyo
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida