Create directory with the name of curent date

This code has been declared by its author to be Public Domain code.

Create directory with the name of curent date by Wings

2005

Creates a directory in curent dir with the name of curent date

;Creates a directory in curent dir with the name of curent date.
a$=CurrentDate$()
d1$=Mid$(a$,1,2)
d2$=Mid$(a$,4,3)
d3$=Mid$(a$,8,4)

dir$=d3$+"-"+d2$+"-"+d1$
ExecFile("cmd /C "+Chr$(32)+"MKDIR "+dir$+Chr$(32))

Comments

Yan

2005

You're gonna kick yourself...

CreateDir(Replace(CurrentDate$(), " ", "-"))

;o)

Wings

2009

My good Repleace is sweet !

Code Archives Forum