Salve a tutti!
Ho un problema quando tento di copiare un file in una directory.
Il codice è il seguente:
Quando tento di eseguire mi da l'errore '8007052e', esattamente alla linea in cui tento di copiare.codice:<%@LANGUAGE = VBScript%> <% Dim mese Select Case Month(date) Case 1 mese = "GENNAIO" Case 2 mese = "FEBBRAIO" Case 3 mese = "MARZO" Case 4 mese = "APRILE" Case 5 mese = "MAGGIO" Case 6 mese = "GIUGNO" Case 7 mese = "LUGLIO" Case 8 mese = "AGOSTO" Case 9 mese = "SETTEMBRE" Case 10 mese = "OTTOBRE" Case 11 mese = "NOVEMBRE" Case 12 mese = "DICEMBRE" End Select Dim sFilePath sFilePath = "aaa.bbb.ccc.ddd\Campagne\Gestionale Piattaforma " & mese & ".xls" %> <% Dim newdir, objFile Set FileObject = Server.CreateObject("Scripting.FileSystemObject") BlnDir = FileObject.FolderExists(Server.MapPath("Backup Gestionali " & mese)) 'response.end if blnDir = true then Set FileObject = Nothing else newdir = "Backup " & mese Set objFile = Server.CreateObject("Scripting.FileSystemObject") objFile.CreateFolder Server.MapPath(newdir) Set FileObject = Nothing end if %> <% Dim fsoMyFile 'Creazione dell'istanza FSO. Set fsoMyFile = CreateObject("Scripting.FileSystemObject") fsoMyFile.CopyFile "\\" & sFilePath, newdir & "\" & "prova.xls", False %> <html> <head><title>test</title></head> <body> aaa </body> </html>
Il file esiste nel percorso indicato, il link html che ho messo nella pagina ne è una prova (se commento la copia del file e clicco sul link mi apre il file senza problemi).
Il file che tento di copiare è su un'altra macchina, dunque penso che i problemi possano dipendere da questo, ma in questo caso non credo che dovrebbe permettermi nemmeno di aprire il file da browser tramite il link, no?
Qualcuno sa darmi una mano?
Grazie in anticipo a tutti!
![]()

Rispondi quotando
