Rinominare Cartella sul Server

[mexican]

Ciao a tutti io lato gestione ho necessità di rinomicanre una cartella sul server. uso il metodo Move ma mi da errore ecco il codice:

Dim path As String 
path = Server.MapPath("(/../../../Newsletter/" & Replace(Replace(cartella.Text, "'", "''"), " ", "") & "/")
Dim target As String 
target = Server.MapPath("(/../../../Newsletter/" & Replace(Replace(nome_cartella.Text, "'", "''"), " ", "") & "/")

'Modifico la cartella 
' Controllo se la cartella con il nuovo nome esiste.
If Directory.Exists(path) = False Then
' Se non esiste la crea
Directory.CreateDirectory(path)
							
' Poi sposto il contenuto della cartella vecchia (target) nella nuova (path)
Directory.Move(path, target)
'Poi cancello la vecchia )target)
If Directory.Exists(target) Then
Directory.Delete(target, True)
End If

Dove sta l'errore in questo codice?

[mexican]

Originariamente inviato da mexican
Ciao a tutti io lato gestione ho necessità di rinomicanre una cartella sul server. uso il metodo Move ma mi da errore ecco il codice:

Dim path As String 
path = Server.MapPath("(/../../../Newsletter/" & Replace(Replace(cartella.Text, "'", "''"), " ", "") & "/")
Dim target As String 
target = Server.MapPath("(/../../../Newsletter/" & Replace(Replace(nome_cartella.Text, "'", "''"), " ", "") & "/")

'Modifico la cartella 
' Controllo se la cartella con il nuovo nome esiste.
If Directory.Exists(path) = False Then
' Se non esiste la crea
Directory.CreateDirectory(path)
							
' Poi sposto il contenuto della cartella vecchia (target) nella nuova (path)
Directory.Move(path, target)
'Poi cancello la vecchia )target)
If Directory.Exists(target) Then
Directory.Delete(target, True)
End If

Dove sta l'errore in questo codice?

ragazzi scusate ho risolto c'era molto codice che non serviva

bastava solo questo: Directory.Move(path, target)