copyfile... no entiendo.

copyfile... no entiendo.

Postby goosfancito » Wed Sep 24, 2014 11:43 am

Hola.

Quiero copiar un archivo de 100 kb de una carpeta a otra
Code: Select all  Expand view
  copyfile( "d:\datos\tbtabla.MYD", "z:\a" )


y reviso la carpeta "a" y no tiene nada. no entiendo que esta pasando , el archivo origen ("d:\datos\tbtabla.myd") existe.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: copyfile... no entiendo.

Postby jmartial » Wed Sep 24, 2014 11:55 am

Hola,

¿No habrá que poner el nombre fichero destino?

copyfile( "d:\datos\tbtabla.MYD", "z:\a\tbtabla.MYD" )
Un Saludo,
Joaquín Martínez
jmartial
 
Posts: 458
Joined: Tue Mar 14, 2006 7:26 pm

Re: copyfile... no entiendo.

Postby goosfancito » Wed Sep 24, 2014 12:09 pm

ya probé de esa manera y tampoco.

Hy no es mi dia para programar evidentemente...
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: copyfile... no entiendo.

Postby hmpaquito » Wed Sep 24, 2014 12:48 pm

Un posible problema es el destino que especificas "a".
Si por ejemplo existe una carpeta llamada "a" no te va a crear el archivo. Prueba con otro nombre de archivo o prueba a ver si existe la carpeta "a" en destino.

En esos casos, antes de caer en locura, en bueno ver qué devuelve el FError()... También comprueba si CopyFile() devuelve algún resultado.
hmpaquito
 
Posts: 1482
Joined: Thu Oct 30, 2008 2:37 pm

Re: copyfile... no entiendo.

Postby karinha » Wed Sep 24, 2014 12:48 pm

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7251
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: copyfile... no entiendo.

Postby karinha » Wed Sep 24, 2014 12:55 pm

Mira también, \samples\DLGFILE.PRG

Salu2
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7251
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: copyfile... no entiendo.

Postby MarioG » Wed Sep 24, 2014 2:29 pm

Goos;
probe con este sample (son de unos samples que baje, hace bastante, de la pagina de xHarbour(org) ).
Lo compile con Harbour (presupongo que con xHarblur anda), y copió Ok
Code: Select all  Expand view
#include "fivewin.ch"

procedure main()
   local nBytes := 0

   ? "comenzamos"
   __copyfile( "..\tExplore.exe", "d:\a\tExplore.exe", /*{|n| ( nBytes += n, QOut("Bytes copied:",nBytes)}*/  ) // 3 Parametro comentado
   ? "terminamos"
return
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: copyfile... no entiendo.

Postby goosfancito » Wed Sep 24, 2014 3:13 pm

si MArio.

Gracias. Tengo problemas al generar el exe y postie para ver que me dice Antonio, porque hacia modificaciones chicas de las pruebas que hacia y no
obtenia resultados, asi como me dijiste anduvo desde el principio pero mi aplicacion no contemplaba el cambio del SOURCE y es por eso
que no me copiaba.

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: copyfile... no entiendo.

Postby antolin » Wed Sep 24, 2014 5:36 pm

Yo lo utilizo bastante:
Code: Select all  Expand view
CopyFile(c:\Origen\Fichero.Org","C:\Destino\Fichero.Dest",0)

A lo mejor te faltaba el ",0" final.
Peaaaaaso de foro...
antolin
 
Posts: 492
Joined: Thu May 10, 2007 8:30 pm
Location: Sevilla

Re: copyfile... no entiendo.

Postby goosfancito » Wed Sep 24, 2014 7:21 pm

sisi.
funciona bien. es que las pruebas que hacia no respondian pero si funciona, con y sin el cero.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: copyfile... no entiendo.

Postby antolin » Thu Sep 25, 2014 8:16 am

Ok. El 0 es para sustituir el fichero destino sin preguntar (creo).
Peaaaaaso de foro...
antolin
 
Posts: 492
Joined: Thu May 10, 2007 8:30 pm
Location: Sevilla


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 9 guests