怎么用批处理在指定的文件夹里寻找特定的文件夹，并打包放在指定的文件夹

如何用批处理在指定的文件夹里寻找特定的文件夹，并打包放在指定的文件夹
指定文件夹 p= e:\test
寻找的文件夹名：20120101
打包到 e:\upload


[解决办法]
或者要改为

Perl code

cd /d e:\testfor /f %%d in ('dir /ad /b /s 20120101') do c:\progra~1\winrar\rar a e:\upload\pack.rar -r %%d