Tengo este VBS, y parece que de un día para otro me falla, no tengo mucha idea, y me a caido este problema del cielo...
Por lo que he podido ver falla en la linea 13 (marcado en rojo) ¿alguien que me pueda ayudar?
Código:
Const OverwriteExisting = True
Dim MiFecha
Dim fecha
Dim newArray
newArray = split(DateAdd("d",-1,Date),"/")
Fecha= newArray(2) & newArray(1)
Fecha2= newArray(0)
Set objFSO = CreateObject("Scripting.FileSystemObject")
WSCRIPT.ECHO "C:\tasks\SAAV-avfrsxb-ch11\actual_booking_average_rates_" & Fecha & ".dat"
objFSO.CopyFile "C:\tasks\SAAV-avfrsxb-ch11\actual_booking_average_rates_" & Fecha & ".dat", "\\bcnsvbt01\Aplicaciones\BusinessNet\Varis\ImportadorDivisas\InputFiles\actual_booking_average_rates_" & Fecha & Fecha2 & ".dat", OverwriteExisting
wscript.sleep 2000
objFSO.DeleteFile("C:\tasks\SAAV-avfrsxb-ch11\*.dat"), DeleteReadOnly