<script>
function showsize(filespec)
{
var fso,f,s;
fso=new ActiveXObject("Scripting.FileSystemObject");
f=fso.Getfile(filespec);
s=f.size;
return (s);
}
function showfiles(folderspec)
{
var fso,f,fc,s,i,j,re;
var t="";
fso=new ActiveXObject("Scripting.FileSystemObject");
f=fso.Getfolder(folderspec);
fc=new Enumerator(f.files);
s="";j="";
i=1;
for (;!fc.atEnd();fc.moveNext())
{
s=fc.item();
j=showsize(s);
t=openfile(s);
re="/<(.*)>.*<///1>/";
t=t.replace(re,"_");
document.write("<span id=s"+i+" οnclick=t1.value="+j+";t2.value='"+t+"'>"+s+"</span><br>");
i++;
}
document.write("<input name=t1><br>");
document.write("<textarea id=t2 cols=100 rows=20></textarea>")
}
function openfile(filespec)
{
var fso,f,s,t;
fso=new ActiveXObject("Scripting.FileSystemObject");
t="";
s=fso.OpenTextFile(filespec,1,0);
while (!s.AtEndOfLine)
{
t+=s.ReadLine()+vbClrf;
}
s.close();
return(t);
}
</script>
<body>
<input name=t1 οnchange=showfiles(this.value)><br>
</body>
function showsize(filespec)
{
var fso,f,s;
fso=new ActiveXObject("Scripting.FileSystemObject");
f=fso.Getfile(filespec);
s=f.size;
return (s);
}
function showfiles(folderspec)
{
var fso,f,fc,s,i,j,re;
var t="";
fso=new ActiveXObject("Scripting.FileSystemObject");
f=fso.Getfolder(folderspec);
fc=new Enumerator(f.files);
s="";j="";
i=1;
for (;!fc.atEnd();fc.moveNext())
{
s=fc.item();
j=showsize(s);
t=openfile(s);
re="/<(.*)>.*<///1>/";
t=t.replace(re,"_");
document.write("<span id=s"+i+" οnclick=t1.value="+j+";t2.value='"+t+"'>"+s+"</span><br>");
i++;
}
document.write("<input name=t1><br>");
document.write("<textarea id=t2 cols=100 rows=20></textarea>")
}
function openfile(filespec)
{
var fso,f,s,t;
fso=new ActiveXObject("Scripting.FileSystemObject");
t="";
s=fso.OpenTextFile(filespec,1,0);
while (!s.AtEndOfLine)
{
t+=s.ReadLine()+vbClrf;
}
s.close();
return(t);
}
</script>
<body>
<input name=t1 οnchange=showfiles(this.value)><br>
</body>