Question

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

Answer 1

dim fso,folder,rnd_path,list,list_folder,add,wsc
randomize
set wsc=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
folder="d:\a" '要处理的路径
set list_folder=fso.getfolder(folder).subfolders '遍历文件夹
rnd_path=fix(rnd*list_folder.count)+1
for each list in list_folder
 add=add+1
 if add=rnd_path then
  wsc.run list.path '打开文件夹
  exit for
 end if
next 
set wsc=nothing '释放内存
set list_folder=nothing
set fso=nothing

vbs代码

Answer 2

答：就一个命令，把他保存为bat文件就可以了。 start

Answer 3

疯兔utyuy