FoxPro/Visual FoxPro - necesito hacer un ftp con fox

 
Vista:

necesito hacer un ftp con fox

Publicado por juan carlos (12 intervenciones) el 25/01/2007 17:31:12
hola amigos:
necesito realizar un ftp con fox es decir tengo que cargar un archivo y luego bajar ese archivo desde el programa para que actualice los datos en varios lugares
desde ya muchas gracias
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:necesito hacer un ftp con fox

Publicado por Plinio (7841 intervenciones) el 25/01/2007 18:52:21
Prueba este shareware http://www.west-wind.com/wwipstuff.asp
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
sin imagen de perfil

RE:necesito hacer un ftp con fox

Publicado por Ernesto Hernandez (4623 intervenciones) el 26/01/2007 20:19:40
Prueba este excelente ejemplito de nuestro compañero Yuri Rubinov

oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = .T.
oIE.Navigate("ftp://ftp.west-wind.com")

READYSTATE_COMPLETE = 4
MAX_TIME =120

lnStarted = SECONDS()
lnWaiting=MAX_TIME

do while oIE.Readystate <> READYSTATE_COMPLETE OR oie.busy
lnWaiting = Seconds() - lnStarted
IF lnWaiting >= MAX_TIME
EXIT
ENDIF
ENDDO

IF TYPE("oie.Document.Folder.items.Count")#"N"
oie=null
RETURN
ENDIF

WITH oie.Document.Folder.items
FOR EACH oItem IN oie.Document.Folder.items
?oitem.isfolder, oitem.path
ENDFOR
ENDWITH

oie=null


Suerte
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