Crear una nueva carpeta con la fecha actual dinámicamente desde Datacycle

Datacycle Reporting permite la ejecución de scritps a través de la tarea Código script dentro de un proceso y la opción de crear un directorio dinámicamente puede ser una opción interesante.

A continuación tenemos un ejemplo que utiliza la fecha actual para crear el nombre de la carpeta: NuevaCarpeta en el directorio c:\temp. El lenguaje que se ha utilizado es Visual Basic script:

Sub CrearNuevaCarpeta
    Dim strMonth,strDay,strYear,strFolderName

    strMonth = Month(Date)
   
    If Len(strMonth) = 1 Then
        strMonth = "0" & strMonth
    End If

    strDay = Day(Date)

    If Len(strDay) = 1 Then
        strDay = "0" & strDay
    End If

    strYear = Year(Date)

    strFolderName = "C:\Scripts\NuevaCarpeta_" & strMonth & "-" & strDay & "-" & strYear

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.CreateFolder(strFolderName)

End Sub