Vorrei copiare la la cartella "defaultDat" e incollarla nella dir: Pth & "\Source\DB\Ait\" ma la cartella dovrebbe rinominarsi come da text1.text , solo che non capisco dove sbaglio
potete aiutarmi?
il codice che uso e' questo:
codice:
Dim fso As New FileSystemObject
fso.CopyFolder(Pth & "\Source\defaultDat", Pth & "\Source\DB\Ait\", True) = Text1.Text
e l'errore e' : Errore di compilazione: Prevista Function o variabile.

grazie