程序也很简单，就是遍历一下本地目录，然后产生一堆ftp命令。
复制代码 代码如下:
function matchdemo（strfoldername）{
var s;
var re = /200\d{5}/ig;
s = strfoldername.match（re）；
return（s）；
}
function init（）
{
strscript =open 192.168.1.32 \n;
strscript+=user sybase 111111 \n;
strscript+=bin\n;
strscript+=prompt\n;
strscript+=cd /hisdata/olddata \n;
dicwhitelist = new activexobject（scripting.dictionary）；
dicwhitelist.add （20051205_pihou, ）；
dicwhitelist.add （20051206_pihou, ）；
dicwhitelist.add （20060701_pihou, ）；
}
function enumsubfolder（osubfolder）
{
var efolders=new enumerator（osubfolder.subfolders）；
var s=;
if（efolders.atend（））
{
return s;
}
else
{
for （； !efolders.atend（）； efolders.movenext（））
{
s+=lcd \;
s+=efolders.item（）；
s+=\\n;
s+=mput *.*\n;
}
return s;
}
}
function checklist（strtobechecked）
{
return !dicwhitelist.exists（strtobechecked）；
}
var strscript,dicwhitlist;
var sfolderpath=e:\\;
var ofs=new activexobject（scripting.filesystemobject）；
init（）；
if （ofs.folderexists（sfolderpath））
{
//wscript.echo（valid folder）；
var ofolders=ofs.getfolder（sfolderpath）；
var efolders=new enumerator（ofolders.subfolders）；
if（efolders.atend（））
{
strscript += mkdir \;
strscript += ofs.getbasename（sfolderpath）；
strscript += \\n;
}
else
{
for （； !efolders.atend（）； efolders.movenext（））
{
strtargetfoldername=matchdemo（efolders.item（）+）；
if（strtargetfoldername==null || checklist（ofs.getbasename（efolders.item（））））
continue;
strtmpfoldername=\+ofs.getbasename（efolders.item（））+\;
strscript += mkdir
strscript += strtargetfoldername;
strscript += \n;
strscript += cd ;
strscript += strtargetfoldername;
strscript += \n;
strscript += enumsubfolder（efolders.item（））；
strscript += lcd
strscript += efolders.item（）；
strscript += \n;
strscript += mput *.*\n;
strscript += cd  \nlcd \n;
}
}
strscript+=bye\n;
wscript.echo（strscript）；
}
else
{
wscript.echo（bad folder name）；
}