Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Create a Folder With a Name Based on the Monday and Friday of the Coming Week Content of Create a Folder With a Name Based on the Monday and Friday of the Coming Week.vbs MD5 Hash: 0BBB85847593825471BAE381E05E3FE1
	intDay = Weekday(Date) If intDay = 1 Then intAdder = 1 Else intAdder = 9 - intDay End If dtmMonday = Date + intAdder dtmFriday = dtmMonday + 4 strFolderName = "C:\Test\" & dtmMonday & " to " & dtmFriday strFolderName = Replace(strFolderName, "/", "-") Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.CreateFolder(strFolderName)

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::