[Resolvido] Alterar nome de pasta via FSO

[Dony 0]

Pessoal,

 

Algume sabe como alterar o nome de uma pasta via FSO? Procurei aqui e não encontrei!

 

Valeu

[Mário Monteiro 179]

Procurou onde?

 

É assim

 

http://www.sloppycode.net/reference/fso/foldername.aspx

[Dony 0]

Mario valeu!

 

Mas pode fechar o topico! Eu havia procurado no forum e encontrado apenas copiar para outra pasta, alterando o nome...

fiz assim e funcionou!

 

mas vou estudar esse que você mandou e quem sabe não mude o meu.... esse é bem menor!

 

Valeu....

[Mário Monteiro 179]

basicamente fora a definicao do objeto e sua destruição é so uma linha de codigo mesmo

[Dony 0]

Tá aí pra galera. metodo by Mario Monteiro...

 

old = "arquivos\"&request.Form("antiga")
nova = "arquivos\"&request.Form("outra")
'set fs=Server.CreateObject("Scripting.FileSystemObject")
Set fso = CreateObject("Scripting.FileSystemObject")

If Not fso.FolderExists(Server.MapPath(nova)) Then
	Set folderObject = fso.GetFolder(Server.MapPath(old)) 
	folderObject.Name = request.Form("outra")
	Set folderObject = Nothing  
	Set fso = Nothing
	response.write("Alterada")
Else
	response.write("Pasta antiga nao encontrada")
End if

Tomara que sirva pra alguem!

[Mário Monteiro 179]

Perfeito http://forum.imasters.com.br/public/style_emoticons/default/clap.gif