获取文件大小

<%
FPath=server.mappath("word/temp.doc")
'FPath="f:/temp/word.asp"

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.GetFile(FPath)

response.write "文件名称："&f.name&"<br>"

response.write "文件大小："&f.size/1024&"K<br>"

response.write "创建时间："&f.DateCreated
%>