问问,有关在客户端判断文件大小的问题

我写的代码如下,但始终的不到F.SIZE的值

 1<html>
 2<head>
 3<script language="VBScript">   
 4sub ok_OnClick   
 5ShowFolderSize document.mainform.mefile.value   
 6end sub   
 7  
 8sub ShowFolderSize(filespec)   
 9Dim fs, f, s   
10Set fs = CreateObject("Scripting.FileSystemObject")   
11Set f = fs.GetFile(filespec)   
12s = UCase(f.Name) & " 大小为 " & f.size & " 字节。"   
13MsgBox s, 0, "文件夹大小信息"   
14End sub   
15  
16</script>
17<title>Untitled Document</title>
18<meta content="text/html; charset=utf-8" http-equiv="Content-Type"/>
19</head>
20<body>
21<form enctype="multipart/form-data" method="post" name="mainform" onsubmit="return geturl()">
22<font color="#E85E35">图片:</font><input name="mefile" size="22" type="file"/>
23<input name="ok" type="submit" value="确定"/>
24</form>
25</body>
26</html>

---------------------------------------------------------------

不能访问客户端的文件系统
---------------------------------------------------------------

1   
2FPath="e:\test\main.htm"   
3  
4Set fso = CreateObject("Scripting.FileSystemObject")   
5  
6Set f = fso.GetFile(FPath)   
7  
8response.write "文件名称:"&f.name&"

<br/>

1"   
2  
3response.write "文件大小:"&f.size/1024&"K

<br/>

1"   
2  
3response.write "创建时间:"&f.DateCreated   

---------------------------------------------------------------

 1<html><head>
 2<script>   
 3  
 4function getFileSize (fileName) {   
 5  
 6if (document.all) {   
 7window.oldOnError = window.onerror;   
 8window.onerror = function (err) {   
 9if (err.indexOf('utomation') != -1) {   
10alert('没有访问文件的权限');   
11return true;   
12}   
13else   
14return false;   
15};   
16var fso = new ActiveXObject('Scripting.FileSystemObject');   
17var file = fso.GetFile(fileName);   
18window.onerror = window.oldOnError;   
19return file.Size; }}   
20</script>
21</head>
22<body>
23<form name="formName"><input name="fileName" type="file"/><br/>
24<input onclick="alert(getFileSize(this.form.fileName.value))" type="button" value="查看文件字节大小"/><br/>
25</form></body>
26</html>

---------------------------------------------------------------

在客户端访问文件系统是一种不安全的做法..
用于internet的站点不要把逻辑建立在客户对你充分信任的前提下
---------------------------------------------------------------

用asp组件,Scripting.FileSystemObject。只要客户端的安全设置允许你访问他的文件系统就可以的。

Published At
Categories with Web编程
Tagged with
comments powered by Disqus