Movefolder

Jag vill byta namn på en mapp och försöker med följande kod men det vägrar totalt....
CopyFolder fungerar men då kopierar den och det vill jag inte... vill endast kunna byta namn på den.
Någon som har grepp om vad som kan vara fel?

foldernameform = Request.Form("foldername")

oldsearchway = "c:\dokument\ursprungsmapp"
newsearchway = "c:\dokument\" & foldernameform

response.write oldsearchway & "<br>"
response.write newsearchway

	Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

	objFSO.Movefile oldsearchway, newsearchway
'	objFSO.MoveFolder(oldsearchway, newsearchway)
'	objFSO.MoveFolder oldsearchway, newsearchway, TRUE
'	objFSO.CopyFolder oldsearchway, newsearchway, TRUE

	Set objFSO = Nothing

Felmeddelande:

Server object error 'ASP 0177 : 800a0035' 

Server.CreateObject Failed 

/folderproperties.asp, line 105 

The operation completed successfully.

Prova med:

objFSO.MoveFolder oldsearchway, newsearchway

Sen så brukar man översätta sökväg till path. :)

Hehe

Jo som sagt jag har ju provat alla ovanstående därför dom är avmarkerade.... men det går inte då heller... alltså med MoveFolder.... har även testat det utan TRUE...

sen har jag fått något felmeddelande när jag använt path och därför har jag lite svengelskt :)

Du hade inte mitt exempel med. Skillnad på:
objFSO.MoveFolder oldsearchway, newsearchway
och
objFSO.MoveFolder(oldsearchway, newsearchway)

Ah.. vafan.. jag har provat utan () och då fungerade det inte...
nu döpte jag om variablarna till oldpath newpath och nu fungerar det... jag blir galen...

Tack!

har du grepp om hur man kollar om en mapp är tom så att man kan ta bort den utan att några filer försvinner?

Det går ju alltid att kolla storleken på mappen om den är 0 så borde det väl heller inte inte finnas några filer i den, eller hur?

Typ nåt sånt här
If FSO.FolderExists(path) Then
If objFolder.Size = 0 Then
FSO.DeleteFolder(path)
End If
End If

Hmmm
den klagar på objfolder.size

object doesn't support this property or method

If FSO.FolderExists(path) Then
If objFolder.Size = 0 Then
FSO.DeleteFolder(path)
End If
End If

Hur sätter du objektet objFolder?

Heh

var ju enkelt... jag missade ändra objfolder

jag kör ju en loop

for each fo in folder...

och då blev det ju fo.size och inte objfolder.size

Tack ändå!!

:)