手机
当前位置:查字典教程网 >编程开发 >vb >VB获取文件大小的方法
VB获取文件大小的方法
摘要:本文实例讲述了VB获取文件大小的方法。分享给大家供大家参考。具体实现方法如下:希望本文所述对大家的VB程序设计有所帮助。

本文实例讲述了VB获取文件大小的方法。分享给大家供大家参考。具体实现方法如下:

<% ' Copyright (c) 2009, reusablecode.blogspot.com; some rights reserved. ' ' This work is licensed under the Creative Commons Attribution License. To view ' send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California ' 94305, USA. ' Retrieve the file size of a given file. function getFileSize(someFile) dim fs dim file set fs = Server.CreateObject("Scripting.FileSystemObject") set file = fs.GetFile(Server.MapPath(someFile)) getFileSize = FormatFileSize(file.size) set file = nothing set fs = nothing end function ' Format a file size in the most practical units. ' Input: size in bytes function FormatFileSize(size) dim units dim factor units = Array("B", "kB", "MB", "GB", "TB", "PB", "EB", "ZB", "YB") factor = log(size) 7 FormatFileSize = Round(size / (1024 ^ factor), 2) & units(factor) end function %>

希望本文所述对大家的VB程序设计有所帮助。

【VB获取文件大小的方法】相关文章:

VB XMLHTTP使用方法

VBA中连接SQLSERVER数据库例子

VB实现鼠标绘图实例代码

VB6中的LSet语句和RSet语句详解

VB实现的《QQ美女找茬游戏》作弊器实例

VB简单实现防止文件被改写

关于MSCOMM控件的一些说明第1/2页

VB实现屏蔽文本框右键菜单的复制、粘贴等功能的方法

VBA中操作Excel常用方法总结

VB实现的16位和32位md5加密代码分享

精品推荐
分类导航