Question

我有一个名为2010的文件夹。在这里我想要一个每个月的文件夹，如“Jan10”，“Feb10”......“Dec10” 在每个月的文件夹中，我想为“今日日期”创建文件夹

我为目标为

的2010文件夹创建了一个快捷方式

C:\WINDOWS\explorer.exe /n, /e, /select, F:\2010

我想要一种在单击f：\ 2010图标的快捷方式时执行的功能。

任何指针都会很有帮助。

Answer 1

在Windows上，VBScript是你的朋友。我不确定如何获取日期等，但我可以告诉你如何创建一个文件夹：

set s = wscript.createobject("scripting.filesystemobject")
s.createfolder("FOLDER NAME")

Answer 2

以下脚本确实对我有把手

strMonth = MonthName(Month(date))
strYear = Year(Date)
FolderName = "F:\Test\" & strYear &"\" & strMonth & "\" & Day(date) & " " & strMonth 
Set SH = WScript.CreateObject("WScript.Shell") 
CreateSubFolder( FolderName )

Sh.Run """" & FolderName & """", 3, False
Set SH = Nothing 


Function CreateSubFolder(strFolder)

  Dim posSubFolder, strParentFolder, objSFC

  Set objSFC = CreateObject("Scripting.FileSystemObject")


If Not (objSFC.FolderExists(strFolder)) then

set fl =     objSFC.CreateFolder(strFolder)

  End If

结束功能

为今天的日期创建文件夹

2 个答案: