COPIAR O RENOMBRAR ARCHIVOS SCX,SCT

81 views
Skip to first unread message

Simon Apaza

unread,
Feb 16, 2014, 7:34:03 AM2/16/14
to Mundo Visual FoxPro
Hola Amigos:
Tengo varios archivos scx y sus sct y tengo la necesidad de copiar o renombrarlos con otros nombres, en vista que son muchos, como lo haria mediante un codigo.
Puedo hacerlo uno por uno con el modi form 'xx.scx'  y save as.., pero me gustaria hacerlo de un tiron con un prg.
Un saludo cordial y de antemano gracias por la ayuda
simon

Alex Orihuela Rosales

unread,
Feb 16, 2014, 11:31:25 AM2/16/14
to mundovis...@googlegroups.com
Usaria la funciòn ADIR direccionado a una carpeta y con un for leeo todos los archivos y los copio y renombro en otra carpeta.
Saludos
Alex


--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.
 
Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com
---
Has recibido este mensaje porque estás suscrito al grupo "Mundo Visual FoxPro" de Grupos de Google.
Para anular la suscripción a este grupo y dejar de recibir sus correos electrónicos, envía un correo electrónico a mundovisualfox...@googlegroups.com.
Para obtener más opciones, visita https://groups.google.com/groups/opt_out.

Simon Apaza

unread,
Feb 16, 2014, 8:05:28 PM2/16/14
to Mundo Visual FoxPro
Gracias Alex por tu pronta respuesta, por favor me podrias pasar un ejemplo relacionado  con tu comentario.
saludos 
Simon

HernanCano

unread,
Feb 17, 2014, 10:25:25 AM2/17/14
to mundovis...@googlegroups.com

** para renombrar los forms que hay en el dir actual
=adir(TT,"*.scx")
for K=1 to alen(tt,1)

   cForm = tt(K,1)
   rename (cForm) to "new"+cForm
   
   cForm = ForceExt(tt(K,1),".SCT")
   rename (cForm) to "new"+cForm
  
next


Nos cuentas cómo te va....

Erwin Vera (gmail)

unread,
Feb 17, 2014, 10:38:01 AM2/17/14
to mundovis...@googlegroups.com

+1

--

Simon Apaza

unread,
Feb 21, 2014, 4:02:48 PM2/21/14
to mundovis...@googlegroups.com
Gracias Hernan, tu codigo me dio el resultado que buscaba
simon

El 17/2/14, Erwin Vera (gmail) <erwi...@gmail.com> escribió:
Reply all
Reply to author
Forward
0 new messages