英雄无敌5 mac版:如何用javascript访问本地文件

来源:百度文库 编辑:高校问答 时间:2024/04/28 01:05:19

<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 exe()
{
document.form1.tt.value=ShowFolderFileList(1,document.form1.t.value)
}
</script>
<form name="form1" method="post" action="favorite.asp?action=save">
<input name="t" type="text" id="t" value="C:\\Documents and Settings\\Administrator\\Favorites" size="70">
<textarea name="tt" cols="120" rows="30" wrap="VIRTUAL"></textarea>
<br/>
<input type="button" name="Submit" value="载入" onClick="exe();">
</form>