omdøb en folder.

Hej !
Dette omdøber c:\test til c:\test2

Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.MoveFolder "c:\test" , "c:\test2"


/Killer

hmm når jeg sætter det ind sådan her


dim filesys

    set filesys=CreateObject("Scripting.FileSystemObject")
    Set FSO = CreateObject("Scripting.FileSystemObject")
   
    If filesys.FolderExists("c:\"& Initialer) Then 'sæt kilde folder
    filesys.CopyFolder "c:\"& Initialer, "\\fi01af\home$\phm\" ' sæt kilde folder og destinations folder.

    end if
   
    If filesys.FolderExists("c:\"& Initialer) Then 'sæt kilde folder
    filesys.CopyFolder "\\icd001\d$\InfoQueues\Template", "\\fi01af\home$\phm\"& Initialer ' sæt kilde folder og destinations folder.
   
    end if
   
   
    FSO.MoveFolder "\\fi01af\home$\phm\"& Initialer", "\\fi01af\home$\phm\omdøbt\" 'sæt kilde folder og destinations folder.
   

End If     

siger den af slutning på sætning var forventet.

tak for hjælpen... har fixet.