怎样用vbs或者bat随机打开文件夹，比如C:/a文件夹中有很多文件夹，随机打开其中一个。谢谢！

dim fso,folder,rnd_path,list,list_folder,add,wscrandomizeset wsc=createobject("wscript.shell")set fso=createobject("scripting.filesystemobject")folder="d:\a" '要处理的路径set list_folder=fso.getfolder(folder).subfolders