VBScript convert date to string

Question

So I have a possibly simple question that I can not find the answer to.

I am writing a VBScript that will move a subfolder from one folder to another. When moving I want to append the date onto the subfolders name. I have everything working, except I can not figure out how to convert the date to a string so that it can be added to the folder name.

curDate =  Month(Date) + "_" + Day(Date) + "_" + Year(Date) + "_" + Time

If  fs.FolderExists(rsltFldrPath) Then

'Grab folder and Subfolders
Set fldr = fs.GetFolder(rsltFldrPath)
Set subFldr = fldr.SubFolders

For each folder in subFldr
    moveTo = archFldrPath + "\" +folder.name + curDate
    fs.MoveFolder folder, moveTo
Next
End If

Any help is appreciated. Thanks!

Ekkehard.Horner · Accepted Answer · 2011-07-22 15:36:39Z

7

The string concatenation operator in VBScript is "&", so a quick fix would be:

>> curDate =  Month(Date) & "_" & Day(Date) & "_" & Year(Date) & "_" & Time
>> WScript.Echo curDate
>>
7_22_2011_5:32:55 PM

If you specify the exact desired result, I'm willing to propose a better way to achieve your goal.

answered Jul 22, 2011 at 15:36

Ekkehard.Horner

38.8k2 gold badges50 silver badges101 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

user856354 Over a year ago

Hm...well my main goal is to have a folder called "Results" To end up being called "Results_Month_Day_Year_Time" So that when I move it there is no other possible files that it will overwrite.

Ekkehard.Horner Over a year ago

What about the space after "Results"? Do you want the PM/AM? Should the day and month be zero padded?

Indrajeet · Accepted Answer · 2014-12-30 10:15:32Z

3

Ekkehard.Horners answer won't work as Time needs to be reformatted to remove the colons (:) Folders cannot have colons.

Try;

curDate =  Month(Date) & "_" & Day(Date) & "_" & Year(Date) & "_" & Time

Replace(CurDate,":","-")

I'm sure there's a more succinct answer but that will work also padding shouldn't be an issue as the underscores will negate duplicate possibilities.

I wanted to comment but don't have enough rep.

edited Dec 30, 2014 at 10:15

Indrajeet

5,7062 gold badges30 silver badges43 bronze badges

answered Dec 30, 2014 at 9:46

simon henry

311 bronze badge

Comments

andrea · Accepted Answer · 2024-09-05 15:38:42Z

-1

hi in my test I supported the days of the date on variables, then I converted the variables into strings and it worked.

answered Sep 5, 2024 at 15:38

andrea

1

Collectives™ on Stack Overflow

VBScript convert date to string

3 Answers 3

2 Comments

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

3 Answers 3

2 Comments

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related