Renombrar carpeta con FSO

Lo ideal seria hacer un componente que haga eso e invocarlo

Jorge
"Karmico" escribió en el mensaje
news:cmaisv$o39$

Hola a todos

me gustaria saber como renombrar una carpeta con FSO.

O si no, como copiar todos los archivos a la nueva carpeta y borrar la
anterior...

Gracias!

Hola Karmico.

Conozco dos forma:

<%
Dim objFSO, objFSOPath, objFSOFolder
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSOPath = "C:\pruebas\prueba1"
Set objFSOFolder = objFSO.GetFolder(objFSOPath)
' Usando el método "move":
objFSOFolder.Move("C:\pruebas\prueba2")
' Cambiando la propiedad "name":
objFSOFolder.Name = "prueba3"
Set objFSOFolder = Nothing
Set objFSO = Nothing
%>

A lo mejor hay alguna forma más eficiente...

Saludos!
Miguel

Karmico wrote:

Hola a todos

me gustaria saber como renombrar una carpeta con FSO.

O si no, como copiar todos los archivos a la nueva carpeta y borrar la
anterior...

Gracias!

Genial!

Me quedo con cambiar la propiedad "name": objFSOFolder.Name = "prueba3"
porque es justo lo que quería, renombrar la carpeta.

Muchas Gracias Miguel!


"Miguel Gonzalez" escribió en el mensaje
news:
Hola Karmico.

Conozco dos forma:

<%
Dim objFSO, objFSOPath, objFSOFolder
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSOPath = "C:\pruebas\prueba1"
Set objFSOFolder = objFSO.GetFolder(objFSOPath)
' Usando el método "move":
objFSOFolder.Move("C:\pruebas\prueba2")
' Cambiando la propiedad "name":
objFSOFolder.Name = "prueba3"
Set objFSOFolder = Nothing
Set objFSO = Nothing
%>

A lo mejor hay alguna forma más eficiente...

Saludos!
Miguel

Karmico wrote:

Hola a todos

me gustaria saber como renombrar una carpeta con FSO.

O si no, como copiar todos los archivos a la nueva carpeta y borrar la
anterior...

Gracias!