Arrays 带变量的2级文件循环

我是VBS新手，我正在尝试做一些我不知道如何做的事情。 第一级： 我有一组可变名称，我想用它们来检查文件夹是否存在，然后再创建一个文件夹

strVar(0) = "AA
strVar(1) = "AB"
strVar(2) = "AK"

strRootFolder = "C:\IN\ED\Dat\" & strVar
strSourceFolder = X:\\IN\ED\Dat\" & strVar

一旦文件结构如strRootFolder中所示，我需要在每个文件夹中放置另一个名为CAL的文件夹

例如，我的文件结构是-

"C:\IN\ED\Dat\AA\Cal\"
"C:\IN\ED\Dat\AB\Cal\"
"C:\IN\ED\Dat\AK\Cal\"

第二级： -将有多个FileNumber未知，其文件类型与我的列表中的变量相同。所以它看起来像C:\IN\ED\Dat\AA\Cal\testfile.AA。我需要能够检查每个文件夹中的每个文件，并将上次修改的日期与strSourceFolders上次修改的日期进行比较，如果源文件较新，则替换rootfolders文件

所以

If not strRootFolder & "*.AA" = strSourceFolder & "*.AA" Then
Copyfile strsourcefolder --->  strRootFolder