欢迎来到福编程网,本站提供各种互联网专业知识!

硬盘浏览程序,保存成网页格式便可使用

发布时间:2006-12-03 作者: 来源:转载
硬盘浏览程序,保存成网页格式便可使用,放到随意一个盘,不要放桌面就可以了复制代码代码如下:varerrorinf=newError();varfso,fdrive,ffolder,ffile;vargetdata="",selfpath="",drvpath="",favpath="";vardrive=newArray(),favorite=newArray();varcu
硬盘浏览程序,保存成网页格式便可使用,放到随意一个盘,不要放桌面就可以了
复制代码 代码如下:



varerrorinf=newError();
varfso,fdrive,ffolder,ffile;
vargetdata="",selfpath="",drvpath="",favpath="";
vardrive=newArray(),favorite=newArray();
varcurrentdrive="";
varhidestate=false;
varlastdrive="",lastfav="";
varppath=newError(),ppathcounter=0,favcounter=0;
varopenfromfav=0;
functioninitdoc()
{
try
{
varoutstr="",counter=0,i=0,writestr="";
fso=newActiveXObject("Scripting.FileSystemObject");
selfpath=fso.GetParentFolderName(location.pathname.replace(///,""));
drvpath=selfpath+"drvinf.ini";
/*Gettheharddrivesonthecomputer.*/
if(!fso.FileExists(drvpath))
{
fdrive=fso.Drives;
getdata=newEnumerator(fdrive);
for(;!getdata.atEnd();getdata.moveNext())
if(getdata.item().DriveType==2)
{
drive[counter]=getdata.item().DriveLetter;
writestr+=drive[counter]+"$";
counter++;
}
ffile=fso.CreateTextFile(drvpath,true);
writestr=writestr.replace(/$$/,"");
ffile.WriteLine(writestr+"r");
ffile.Close();
}
else
{
ffile=fso.OpenTextFile(drvpath,1);
getdata=ffile.ReadAll().replace(/'|"||/|:|s+/g,"");
getdata=getdata.replace(/^$+|$+$/,"");
getdata=getdata.replace(/$$+/,"$");
drive=getdata.split("$");
ffile.Close();
}
for(i=0;ioutstr+="[本地磁盘:"+drive[i]+"]";
outstr+="显示隐藏内容"
document.getElementById("drives").innerHTML=outstr;
getdata="";outstr="";
/*Gettheexistitem.*/
favpath=selfpath+"favinf.ini";
if(fso.FileExists(favpath))
{
ffile=fso.OpenTextFile(favpath,1);
if(!ffile.AtEndOfStream)
{
getdata=ffile.ReadAll().replace(/"|s+/g,"");
getdata=getdata.replace(/^|+||+$/,"");
getdata=getdata.replace(/||+/,"|");
favorite=getdata.split("|");
}
ffile.Close();
if(favorite[0]=="")
favcounter=0;
else
favcounter=favorite.length;
}
else
{
ffile=fso.CreateTextFile(favpath,true);
ffile.Close();
favcounter=0;
}
openfav();
driveactive("C");
getdata="";
}catch(errorinf){alert(errorinf.description+"nn请不要随便改变数据文件*.ini文件中的内容.");}
}
functiondriveactive(driveval)
{
try{
if(lastdrive==("drive"+driveval)&¤tdrive.match(/^[a-z]:$/i))
{
document.getElementById("showorhide").focus();
returnfalse;
}
if(lastdrive=="")lastdrive="driveC";
document.getElementById(lastdrive).style.backgroundColor="#CCCCCC";
lastdrive="drive"+driveval;
document.getElementById(lastdrive).style.backgroundColor="#FFFFDD";
varatt="",drv,totalsize,freespace,usespace,outstr="",pathstr="",attribu=0,subfolfil="",fcount=0;
drv=fso.GetDrive(driveval);
totalsize=Math.round((drv.TotalSize/Math.pow(2,30))*100)/100;
freespace=Math.round((drv.FreeSpace/Math.pow(2,30))*100)/100;
usespace=Math.round((totalsize-freespace)*100)/100;
totalsize>1?totalsize+="GB":totalsize=totalsize*Math.pow(2,10)+"MB";
freespace>1?freespace+="GB":freespace=freespace*Math.pow(2,10)+"MB";
usespace>1?usespace+="GB":usespace=usespace*Math.pow(2,10)+"MB";
att+="本地磁盘:"+driveval+"n文件系统:"+drv.FileSystem+"n磁盘大小:"+totalsize+"n已用空间:"+usespace+"n可用空间:"+freespace+"n";
outstr="";
currentdrive=pathstr=driveval+":";
ffolder=fso.GetFolder(pathstr+"").SubFolders;
getdata=newEnumerator(ffolder);
outstr="文件夹:[隐藏]";
ppathcounter=0;
for(;!getdata.atEnd();getdata.moveNext())
{
attribu=getdata.item().Attributes;
if(hidestate||attribu==16||attribu==17||attribu==48||attribu==49)
{
fcount++;
ppath[ppathcounter]=driveval+":"+getdata.item().name;
outstr+="
outstr+="returnfalse;">"+getdata.item().Name+"
";
ppathcounter++;
}
}
subfolfil="找到"+fcount+"个文件夹,";
fcount=0;
ffile=fso.GetFolder(pathstr).Files;
getdata=newEnumerator(ffile);
outstr+="
文 件:[隐藏]";
for(;!getdata.atEnd();getdata.moveNext())
{
attribu=getdata.item().Attributes;
if(hidestate||attribu==0||attribu==1||attribu==32||attribu==33)
{
fcount++;
outstr+="
"+getdata.item().Name+"
";
}
}
outstr+="
";
subfolfil+=fcount+"个文件.";
document.getElementById("showcontent").innerHTML=outstr;
document.getElementById("currentdrive").innerText=currentdrive;
document.getElementById("showdriveatt").innerText=att;
att="文件夹名称:nn文件夹大小:n创建时间:nn修改时间:nn访问时间:nn";
document.getElementById("showfolderatt").innerText=att;
document.getElementById("subfolfil").innerText=subfolfil;
att="[打开]";
att+="[收藏]";
document.getElementById("openfol").innerHTML=att;
document.getElementById("showorhide").focus();
getdata="";
}catch(errorinf){alert(errorinf.description+"nn请不要随便改变数据文件*.ini文件中的内容.");}
}
functionfolderactive(folderval)
{
try
{
varatt="",fol="",totalsize=0,sizesign="";
openfolder(folderval);
if(!folderval.match(/^[a-z]:$/i))
{
fol=fso.GetFolder(folderval);
totalsize=fol.Size/Math.pow(2,30);
totalsize>1?sizesign="GB":(totalsize=totalsize*Math.pow(2,10),sizesign="MB");
(totalsize<1&&sizesign=="MB")?(totalsize=totalsize*Math.pow(2,10),sizesign="KB"):{}
totalsize=Math.round((totalsize)*100)/100+sizesign;
att+="文件夹名称:n"+fol.Name+"n文件夹大小:"+totalsize+"n创建时间:n";
att+=fol.DateCreated+"n修改时间:n"+fol.DateLastModified+"n访问时间:n"+fol.DateLastAccessed;
document.getElementById("showfolderatt").innerText=att+"n";
}
}catch(errorinf){alert(errorinf.description+"nn请不要随便改变数据文件*.ini文件中的内容.");}
}
functionopenfolder(currfolder)
{
try
{
varsign=0,outstr="",attribu=0,subfolfil="",fcount=0;
if(currfolder==""){alert("没有选择文件夹.");returnfalse;}
currentdrive=currfolder;
ffolder=fso.GetFolder(currfolder).SubFolders;
getdata=newEnumerator(ffolder);
outstr="文件夹:[隐藏]";
ppathcounter=0;
for(;!getdata.atEnd();getdata.moveNext())
{
attribu=getdata.item().Attributes;
if(hidestate||attribu==16||attribu==17||attribu==48||attribu==49)
{
fcount++;
ppath[ppathcounter]=currfolder.replace(/+$/i,"")+""+getdata.item().name;
outstr+="
outstr+="returnfalse;">"+getdata.item().Name+"
";
ppathcounter++;
}
}
subfolfil="找到"+fcount+"个文件夹,";
fcount=0;
ffile=fso.GetFolder(currfolder).Files;
getdata=newEnumerator(ffile);
outstr+="
文 件:[隐藏]";
for(;!getdata.atEnd();getdata.moveNext())
{
attribu=getdata.item().Attributes;
if(hidestate||attribu==0||attribu==1||attribu==32||attribu==33)
{
fcount++;
if(openfromfav==0)
outstr+="
"+getdata.item().Name+"
";
else
outstr+="
"+getdata.item().Name+"
";
}
}
outstr+="";
subfolfil+=fcount+"个文件.";
document.getElementById("showcontent").innerHTML=outstr;
document.getElementById("currentdrive").innerText=currentdrive;
att="文件夹名称:nn文件夹大小:n创建时间:nn修改时间:nn访问时间:";
document.getElementById("showfolderatt").innerText=att;
document.getElementById("subfolfil").innerText=subfolfil;
att="[打开]";
att+="[收藏]";
document.getElementById("openfol").innerHTML=att;
getdata="";
openfromfav=0;
}catch(errorinf){alert(errorinf.description+"nn请不要随便改变数据文件*.ini文件中的内容.");}
}
functionupfile()
{
varrootpath="";
rootpath=currentdrive;
if(!rootpath.match(/^[a-z]:$/i))
{
rootpath=rootpath.replace(/[^]*$/,"");
if(rootpath.match(/^[a-z]:$/i)){rootpath+="";}
folderactive(rootpath);
}
else
alert("驱动器根目录.");
}
functionflashdrive()
{
folderactive(currentdrive);
}
functionopenfav()
{
lastfav="";
varoutstr="",i=0;
for(i;i{
outstr+="outstr+="favactive(this.id);returnfalse;"target='_blank'>"+favorite[i].replace(/^.+/,"")+"

";
}
document.getElementById("showfavorite").innerHTML=outstr;
document.getElementById("delfav").value="";
}
functionfavactive(favid)
{
vari=parseInt(favid.match(/d/));
if(lastfav!="")
document.getElementById(lastfav).style.backgroundColor="#CCCCCC";
lastfav=favid;
document.getElementById("delfav").value=favorite[i];
document.getElementById(lastfav).style.backgroundColor="#FFFFDD";
document.getElementById("showorhide").focus();
}
functionaddfav()
{
try
{
if(currentdrive.match(/^[a-z]:$/i))
{
alert("只能收藏文件夹.");
returnfalse;
}
vari=0;
for(i=0;i{
if(favorite[i]==currentdrive)
{
alert("常用文件夹中已经存在该文件夹.");
returnfalse;
}
}
if(fso.FileExists(favpath))
{
ffile=fso.OpenTextFile(favpath,8);
}
else
{
ffile=fso.CreateTextFile(favpath,true);
}
ffile.Write("|"+currentdrive);
ffile.Close();
favorite[favcounter]=currentdrive;
favcounter++;
openfav();
alert("添加成功.");
}catch(errorinf){alert(errorinf.description+"nn请不要随便删除数据文件*.ini文件.");}
}
functiondelfav()
{
try
{
vardelpath=document.getElementById("delfav").value;
vari=lastfav.match(/d/),j=parseInt(i);
varnewfav="";
document.getElementById("showorhide").focus();
if(delpath=="")
{
alert("没有选择常用文件夹.");
returnfalse;
}
if(confirm("确定删除常用文件夹(并非从硬盘删除):n"+delpath+"n?"))
{
favcounter--;
for(j;jfavorite[j]=favorite[j+1];
for(j=0;jnewfav+=favorite[j]+"|";
ffile=fso.OpenTextFile(favpath,2);
newfav=newfav.replace(/^|||$/,"");
ffile.WriteLine(newfav);
ffile.Close();
openfav();
document.getElementById("delfav").value="";
alert("删除成功.");
}

}catch(errorinf){document.getElementById("delfav").value="";alert(errorinf.description+"nn请不要随便删除数据文件*.ini文件.");}
}
functionunfurlorfold(objid,obj)
{
if(obj.innerText=="隐藏")
{
obj.innerText="显示";
document.getElementById(objid).style.display="none";
}
else
{
obj.innerText="隐藏";
document.getElementById(objid).style.display="";
}
document.getElementById("showorhide").focus();
returnfalse;
}


FileLookThroughAdminV1.0






FileLookThroughAdmin









收藏夹
文件夹及文件
相关信息



HardDrives>>







Tag>>


DisplayContent




CurrentPath>>







常用文件夹:




onmouseover="this.style.backgroundColor='#FFFFDD';"
onmouseout="this.style.backgroundColor='#CCCCCC';">
上一级目录



当前驱动器信息:

当前文件夹信息:







删除常用文件夹:



P:


[执行删除]








Design:sgw.LKing(∮LKing♂)[FS:Ecjtu2006|QQ:28857496|E-Mail:sgw.lking@gmail.com][@06.11]



相关推荐