VBScript 将日期转换为字符串

use*_*354 4 string vbscript date

所以我有一个可能很简单的问题,但我找不到答案。

我正在编写一个 VBScript,它将子文件夹从一个文件夹移动到另一个文件夹。移动时,我想将日期附加到子文件夹名称上。我一切正常,只是我不知道如何将日期转换为字符串,以便将其添加到文件夹名称中。

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
Run Code Online (Sandbox Code Playgroud)

任何帮助表示赞赏。谢谢!

Ekk*_*ner 5

VBScript 中的字符串连接运算符是“&”,因此快速解决方法是:

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

如果您指定确切的所需结果,我愿意提出一种更好的方法来实现您的目标。