日期:2014-05-16  浏览次数:20242 次

通过JS访问文件
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
 <HEAD>
  <TITLE> New Document </TITLE>
  <META NAME="Generator" CONTENT="EditPlus">
  <META NAME="Author" CONTENT="">
  <META NAME="Keywords" CONTENT="">
  <META NAME="Description" CONTENT="">
  <meta http-equiv="Content-Type" content="text/html; charset=GBK" />
 </HEAD>
 <BODY>



<SCRIPT LANGUAGE="JavaScript">
	var s;
    s=" ";
function ShowFolderFileList(i,folderspec)
{
	var fso,f,fc,name;
	var url,str,file,filename;
	var i;
	fso=new ActiveXObject("Scripting.FileSystemObject ");
	f=fso.GetFolder(folderspec);
	s+=i+++"\t "+f.Name+"\t\n ";
	fc=new Enumerator(f.files);
	for(;!fc.atEnd();fc.moveNext())
	{
		filename=fso.GetFileName(fc.item());
		if(filename.indexOf(".url ")>=0)
		{
			filename=filename.substring(0,filename.length-4);
			file=fso.GetFile(fc.item());
			ts=file.OpenAsTextStream(1,0);
			str=ts.ReadLine();
			while(str.indexOf("URL= ")<0&&!ts.AtEndOfStream)
			{
				str=ts.ReadLine();
			}
			ts.Close();
			s+=i+"\t "+filename+"\t "+str.substr(str.indexOf("URL= ")+4)+"\n ";
		}
	}
	fc=new Enumerator(f.SubFolders);
	for(;!fc.atEnd();fc.moveNext())
	{
		ShowFolderFileList(i,fc.item());
	}
	return (s);
}
function exet()
{
	document.form1.tt.value=ShowFolderFileList(1,document.form1.t.value)
}
</SCRIPT>
<form   name= "form1 "  id="form1"   method= "post "   action= "favorite.asp?action=save "> 
    <input   name= "t "   type= "text "   id= "t"   value= "F:\图标"   size= "70 "> 
    <textarea   name= "tt " id= "tt"  cols= "120 "   rows= "15 "   wrap= "VIRTUAL "> </textarea> 
    <br> 
    <INPUT onclick=exet() type=button value=转换>
</form> 
 </BODY>
</HTML>

?