Power Builder - Cargar Archivos

   
Vista:

Cargar Archivos

Publicado por Ernesto (51 intervenciones) el 13/09/2007 16:08:41
Hola a todos.

Tengo un problema. mi aplicacion genera al dia una carpeta con varios archivos de texto.
y nesecito cargar los archivos de texto a un FTP.¿como hago para que el usuario pueda seleccionar el archivo y cargarlo al FTP.?

si tienen algun ejemplo q me puedan enviar , lo agradecere.

Gracias por su ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cargar Archivos

Publicado por Jose Mari (3 intervenciones) el 13/09/2007 17:31:34
Ernesto yo tengo esto que los subo a un ftp.

En tu programa "w_xxxx "te creas una PictureBoxListControl (tambien puedes usar el BoxListControl, pero yo queria iconos)

en el evento open del programa o la funcion de inicio que tengas le metes esto:

string s_filespec, s_path
integer li_pic1, li_pic2, li_position
Long ll_index,ll_titems
String ls_data

lb_filelist.reset()
s_filespec = "\\hp-webserver\linux\*.TXT" //de donde leas los archivos
s_path = "\\hp-webserver\linux\"
lb_filelist.DirList(s_filespec, 1 )
ll_titems = lb_filelist.TotalItems()

li_pic1 = plb_filelist.AddPicture("C:\Ges_Apl\tresource\GLOBE.BMP") //de donde leas las imagenes
li_pic2 = plb_filelist.AddPicture("C:\Ges_Apl\tresource\IE.BMP")
plb_filelist.AddItem(s_path, li_pic1)
For ll_index = 1 To ll_titems
ls_data[ll_index] = lb_filelist.Text(ll_index)
li_position = plb_filelist.AddItem(ls_data[ll_index], li_pic2)
Next

como ves esto lee los ficheros TXT en el directorio "\\hp-webserver\linux\"

en el evento selectionchange del PictureBoxListControl metes esto

string ls_filename, ls_path, ls_filespec = "*.TXT"
ls_path = "\\hp-webserver\linux\"
if plb_FileList.DirSelect(ls_filename) then
ls_filename = ls_filename + ls_filespec
plb_filelist.DirList(ls_filename,0)
else
sle_text.text = ls_path + ls_filename
end if

ya tienes el nombre del fichero con el path en el sle_text.text

ahora para subirlo a tu ftp puedes crear un button y en el evento onclick poner

integer li_FileNum

li_FileNum = FileCopy (sle_text.text ,"W:\xxx.txt", FALSE) //alsitio ftp

yo utilizo el software WebDrive es un gestor de ftp que para mi es bueno y puedes gestionar tus sitios ftp como unidades logicas.

Espero haberte ayudado.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cargar Archivos

Publicado por Jose Mari (3 intervenciones) el 13/09/2007 17:31:54
Ernesto yo tengo esto que los subo a un ftp.

En tu programa "w_xxxx "te creas una PictureBoxListControl (tambien puedes usar el BoxListControl, pero yo queria iconos)

en el evento open del programa o la funcion de inicio que tengas le metes esto:

string s_filespec, s_path
integer li_pic1, li_pic2, li_position
Long ll_index,ll_titems
String ls_data

lb_filelist.reset()
s_filespec = "\\hp-webserver\linux\*.TXT" //de donde leas los archivos
s_path = "\\hp-webserver\linux\"
lb_filelist.DirList(s_filespec, 1 )
ll_titems = lb_filelist.TotalItems()

li_pic1 = plb_filelist.AddPicture("C:\Ges_Apl\tresource\GLOBE.BMP") //de donde leas las imagenes
li_pic2 = plb_filelist.AddPicture("C:\Ges_Apl\tresource\IE.BMP")
plb_filelist.AddItem(s_path, li_pic1)
For ll_index = 1 To ll_titems
ls_data[ll_index] = lb_filelist.Text(ll_index)
li_position = plb_filelist.AddItem(ls_data[ll_index], li_pic2)
Next

como ves esto lee los ficheros TXT en el directorio "\\hp-webserver\linux\"

en el evento selectionchange del PictureBoxListControl metes esto

string ls_filename, ls_path, ls_filespec = "*.TXT"
ls_path = "\\hp-webserver\linux\"
if plb_FileList.DirSelect(ls_filename) then
ls_filename = ls_filename + ls_filespec
plb_filelist.DirList(ls_filename,0)
else
sle_text.text = ls_path + ls_filename
end if

ya tienes el nombre del fichero con el path en el sle_text.text

ahora para subirlo a tu ftp puedes crear un button y en el evento onclick poner

integer li_FileNum

li_FileNum = FileCopy (sle_text.text ,"W:\xxx.txt", FALSE) //alsitio ftp

yo utilizo el software WebDrive es un gestor de ftp que para mi es bueno y puedes gestionar tus sitios ftp como unidades logicas.

Espero haberte ayudado.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar